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I. INTRODUCTION 



Technological advances in computer hardware and software of the past decade has 
been rapid enough to be called a revolution. The wider the use of computers has been 
spread, the more newer application areas have evolved. The need for the use of the 
computers for the Turkish Navy has grown rapidly in recent years. However, the ab- 
sence of the computer technology has limited the variety of areas where computers can 
be used. One aspect of the absence of this technology is the inability to use some char- 
acters in the Turkish alphabet. Because of this, computers are not widely being used for 
text processing purposes. 

Although the Turkish Navy has begun to use computers in a variety of areas in re- 
cent years, lower level organizations such as ships and administrative offices have been 
doing business without the use of computers. One significant example of these jobs is 
to generate and to process official documents. 

Questions we plan to address are: Can we use microcomputers to generate and store 
official documents in computers and will this reduce the amount of paper work? Does 
current technology allow us to use our own alphabet to generate documents? If the 
answer is 'yes', what is the most suitable hardware for these purposes? 

This research attempts to find answers to these questions and investigate the current 
microcomputer technology to determine the feasiblity of text processing on different 
character sets not available on the system. To apply this to a specific area, we will de- 
sign and implement software that meets the requirements for the specific application, in 
order to generate and process official documents. 

A. PURPOSE 

We investigate the current microcomputer technology in order to be able to design 
and implement a software that allows us to display and print extra characters in the 
Turkish alphabet. 

This study is a design and implementation of software which can be used in ship 
bureaus to generate and process unclassified documents which includes all characters in 
the Turkish alphabet. By using microcomputers on this particular area, the amount of 
paper work, the loss of manpower and the negative impact of the lack of personnel can 
be reduced. It also saves space by allowing us to get rid of files that are used to keep a 
record of correspondence. 
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B. SCOPE 

The objective of this study is to design and implement software for automatic doc- 
ument generator supporting the Turkish alphabet. This software is to be for general 
purpose so that it can be used in different bureaus that require various form of docu- 
ments. Since the needs for different bureaus are almost identical and the only thing that 
differs is the forms of documents , it should allow the user to define his own templates 
easily. The software should remain the same, but form definitions that meet user needs 
should be easy to prepare. The software should be compatible with the computer 
hardware and printers used in the Turkish Navy. 

C. ORGANIZATION 

This study consists of five main chapters followed by conclusions and recommen- 
dations. The first chapter provides a brief introduction by defining the research objec- 
tives and its associated scope of effort, outline and organization of this thesis. Chapter 
II presents the system overview and objectives. The user requirements, overall design 
considerations, hardware requirements, and program components are also presented in 
this chapter. Design and implementation of the program will be discussed in Chapter 
III. The implementation of extra characters on the screen and printer will be presented 
in Chapter IV, Using the document generator is presented in Chapter V. This thesis 
concludes in Chapter VI by stating the conclusions and recommendations inferred by 
this study. The Turkish alphabet is presented in Appendix A. A user manual is pre- 
sented in Appendix B. Appendix C will contain the program listing. Example template 
definition and program output document will be presented in Appendix D, 



II. SYSTEM OVERVIEW AND OBJECTIVES 



A. INTRODUCTION 

This chapter consists of three sections : system overview, system objectives, pro- 
gram considerations, hardware requirements and program components. 

System design is the process of planning a new system or one to replace or comple- 
ment the existing system. But before this can be done, the system must thoroughly be 
understood and the following things must be taken into considerations. Who will make 
use of the system? What will the system do? How is it operated? What are the user 
requirements? How portable will it be? Will it be suitable for existing hardware ? 

B. SYSTEM OVERVIEW AND USER REQUIREMENTS 

This section presents a system overview providing a more complete understanding 
of what will be required. This will help explain how the software to be developed can 
be designed to best satisfy the user reqirements. 

Each destroyer has a bureau where correspondence is performed and documents are 
prepared. Generally one petty officer and one seaman are assigned to perform this job. 
Typewriters are the only equipments used to fulfill these tasks. Each ship has its own 
preprinted document forms and reports. The personnel assigned to ship administrative 
offices are in charge of filling out documents submitted by related department personnel 
and delivering them to the appropriate places. Both difficulty in supplying preprinted 
forms and ease of mistyping make the bureau's task harder. Additionally, one copy 
along with the records of incoming and outgoing documents must be retained. There 
are two reference values to access the document or find the document stored in note- 
books: reference by date and reference by document number (which is unique). The 
document number consists of three letters which indicates the class of document and the 
order number within the class of document and last two digit of the current year. 

In order to answer the question 'who' , we must take the seamen into consideration. 
In other words we should assume that the system will be used by an illiterate user com- 
munity. No computer knowledge should be required. 

The system should respond to the user requirements. It should provide the follow- 
ing properties. 

1. Users should be able to fill out documents as described in the template definition. 

They should not be allowed to change the form of the document. 
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2. The system should meet the requirements of different forms. It should be easy for 
users to define new forms. 

3. The system should be user friendly therefore easy for training personnel. 

4. It should also provide a 'Small Turkish Word Processor' property. In other words 
it should allow the user to edit something without format. 

5. Records of incoming and outgoing documents must be provided within the system. 

6. It should store the documents requested by the user. 

7. It should provide an ability to browse documents. The documents stored in data- 
base can be browsed but not changed. 

C. OVERALL DESIGN CONSIDERATIONS 

The following assumptions have been made in the design of this project. 

1. No user knowledge of computers is required. User will be responsible for filling 
predefined spaces on screen as in form of document. The program will prevent the 
user from overwriting on non-fillable fields on the form of document. 

2. There will not be any limit for the number of document forms to be used. Tem- 
plates should be easy to define. 

3. Since no user knowledge is required, program should be user friendly as much as 
possible. 

4. The most significant assumption is that all template definitions will be entered 
correctly. Program will not check the templates. It will assume they were entered 
correctly. 

5. The key to database search is by the document number which is unique. It is as- 
sumed that keywords to the database will be entered correctly. 

D. HARDWARE REQUIREMENTS 

In order to make use of this program, the following hardware requirements should 
be met by the machine on which this program is running, I mainly focused on IBM 
personal computers and its compatibles. Following hardware components must exist 
on the system in addition to the system itself. 

1. The machine on which this program is running has to have a fixed disk in order to 
store documents in the database. 

2. To meet one of the user requirements which is usage of extra characters in the 
Turkish alphabet, the system has to have either a Color Graphics Adapter or En- 
hanced Graphics Adapter. These conditions will be checked by the program during 
the installation process. If these requirements are not met by the system, program 
will exit by prompting user. 

3. The extra character set in the Turkish alphabet to be printed is designed with re- 
spect to dot matrix printer. Since there is no way to check printer type, program 
will assume that an appropriate printer is attached to the system. 
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No further hardware components are required. 

E. PROGRAM COMPONENTS 

The program consists of seven modules. Modules have been determined according 
to the meaning of the task performed. The program modules and the files related to 
them are listed below. The detailed explanation will be presented in Chapter III. The 
program consists of following modules. 

1. Database Module 

2. Editor Module 

3. Template Module 

4. User Interface Module 

5. System Functions Module 

6. Printer Routines Module 

7. EGA Character Generator Module 

8. CGA Character Generator Module 

9. Main module 

10. Linked List Abstract Data Type 

11. Double Linked List Abstract Data Type 
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III. DESIGN AND IMPLEMENTATION 



A. INTRODUCTION 

There are several phases to software design. The purpose should not be merely to 
meet the user requirements. In the design of the software, software engineering concepts 
should be taken into consideration. These concepts are modularity, abstraction, 
reusabilty and information hiding. Especially in big projects, application of these con- 
cepts makes the software easy to construct, to maintain and test. 

The choice of the programming language is also a major factor in achieving the goal. 
I chose the C language to implement this program. The programs in this thesis have 
been written in the C language by using a TURBO C compiler [Ref. 1]. The features 
offered by the C language made it easier to apply the concepts stated above. Although 
this is not a big project, it attempts to use these concepts by taking advantage of the 
features offered by the C language. 

In this chapter, I will explain how this program was designed and implemented un- 
der the light of these concepts. This chapter will provide explanations on design and 
implementation of the program, reusabilty and portabilty issues, and the program mod- 
ules. 

B. OVERALL PROGRAM DESIGN CONSIDERATIONS 

In the design of this program, I took a top-down design approach. The main tasks 
required to meet the user requirements led me the modules of the program. Once the 
program is modularized then it is easy to construct the entire program by stepwise re- 
finement method. Stepwise refinement helps us to easily apply the process of abstraction 
[Ref. 2: p 1053-1058]. Well modularized program also helps us to easily apply the 
process of abstraction [Ref. 3: p 1-43], information hiding [Ref. 4: p 339-344]. 

I constructed the program modules according to the tasks to be performed. By us- 
ing C language's feature, each module has been designed and compiled separately. 
Then, each module has been integrated to other modules after completion and testing 
of separate modules, by using structured programming and the stepwise refinement 
technique. Overall program construction, together with the module, is shown in Figure 
1. This program consists of the following program modules. 

1. TEMPLATE. C: Template generator routine. 
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Figure 1. Program Components 



2. EDITOR. C: Editor module. 

3. USERINT.C: User interface module. 

4. DBASE. C: Database module. 

5. PRINTER. C: Printer module that contains printer related functions. 

6. MYMAIN.C: Main module. 
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The main decision in the design of the modules is to provide functional interface 
among the modules. To hide the internal structure of each module, therefore to apply 
information hiding principle, modules are interfaced by means of predetermined function 
calls and overall design assumptions. Another design decision is the visibility of the 
program buffers among the modules. 

In addition to program modules listed, there are four other modules. These are 

1. SYSTEM. C: Contains system dependent functions 

2. DLLADT.C: Doubly linked list abstract data type. 

3. LLADT.C: Linked list abstract data type that is used by database program module. 

4. EGA.C: Memory resident program that creates extra characters in the Turkish al- 
phabet for EGA. 

5. CGA.C: Memory resident program that creates extra characters in the Turkish al- 
phabet for CGA. 

From the portabilty point of view, I collected all hardware and operating system 
dependent functions in a separate module. When the program is ported, all functions 
in this module should be replaced with the appropriate ones. The second module, doubly 
linked list abstract data type, is the general purpose doubly linked list abstract data type. 
It is designed so that it is totally reusable. This is also an example of information hiding, 
abstraction and resuable program module. The portabilty and reusabilty issues will be 
presented later in this chapter. The last two modules are totally independent from the 
program. These modules are themselves independent programs which handles character 
generation on CGA and EGA. Since these programs contain TSR instructions, they 
have to be independent programs. These are compiled and run outside of integrated de- 
velopment environment. 

C. PROGRAMS IN THIS PROJECT 

In this section, program modules are explained separately. Each program module 
will be described functionally and together with its own structure. The complete source 
program and make file is presented in Appendix C. 

1. TEMPLATE. C: 

This module contains all function definitions that are related to template gen- 
eration. It provides functional interface to other modules on the data structure chosen. 
Data structure to hold information is doubly linked list and all operations on data 
structure and needed by other modules are defined as a function. Therefore other 
modules are not dependent on the data structure used within this module. Since the 
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template definition for each document form is a set of fields, each node of linked list 
holds the information about one field on the form. This module performs all operations 
on data structure by using DLLADT.C module. This module is a general purpose 
doubly linked list abstract data type. Module TEMP LATE. C is not required to know 
the internal data structure of this module. It only sends a pointer to the data to be in- 
serted into linked list. The implementation details for DLLADT.C will be explained 
later. Figure 2 shows the general data structure for the template generator module. 
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Since creation of the extra characters in the Turkish alphabet requires graphics 
mode for color graphics adapter and text mode for enhanced graphics adapter, my design 
decision is to use only one video page for both video modes. Throughout the program 
the IBM PC default video page which is zero has been used. Instead of using scroll up 
and down functions on the screen, 1 used an IBM mainframe XED IT-like .editor with 
defined keys. When new page is requested by user, screen is cleared and a new page is 
written. This page swapping operation is handled by template generator routine. Since 
all template definitions for each document format are defined with respect to coordinates 
on the page, functions that responds to the requests to these coordinates from other 
module hide this fact and returns the coordinate values as if they are defined with respect 
to screen. 

When requested by main module, this module converts all information in the 
data structure to ASCII text file format, text file format and holds them in a global 
buffer. This buffer is also visible to other related modules. 

Which template to be loaded is determined by the user interface module and 
requested from this module by means of the order number of template in file. As will 
be explained in user manual, each template definition must start with a header line 
whose first character is When the user requests to fill out any document, all docu- 
ment definitions are displayed by reading the template file and seeking every line begin- 
ning with character. Then the user is asked to enter the number of the document 
form and template definition for the requested form is read into the data structure with 
respect to this number. According to the number of the template definition entered, it 
displays the document form and then answers requests from other modules by providing 
a functional interface to the data structure. 

2. EDITOR.C: 

This module is a small editor. It consists of two functions. Function get reply ( ) 
performs editing operations on each field of the form. This function gets the address of 
the message and reply field and the coordinates for those fields. It allows the user to edit 
each field by using defined keys. In case it is asked to edit an already edited field, first 
it copies everything from the address sent into its own buffer, clears everything in ori- 
ginal address then performs editing operations on this buffer. Before exiting the current 
field, it copies everything into original buffer whose address is sent as a parameter to the 
function. It does not allow the user to overwrite to the uneditable part of the fields on 
the screen. When the user is trying to overwrite to undesirable field or to use undefined 
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keys, it warns the user by beeping. Defined keys and the explanation on how to use the 
editor will be presented in the user manual in Appendix B. 

This function also performs one more task. It interprets the keys assigned for 
extra characters in the Turkish alphabet. The keyboard interpreter routine is embedded 
in this function. It interprets the defined keys for editor and combination of ALT keys 
assigned for extra characters. 

The second function that takes place within this function is edit _page(). It 
performs operations for editing the entire page. It determines the next step according 
to a return code from function getreplyf ). This way it calls approppriate functions from 
template generator module. Return codes from function getreply( ) are the keys which 
cause an end to editing each field. The user is allowed to jump back and forth among 
the fields via up and down arrow keys or he may request a change to the video page. 
Function edit __page( ) determines where to go according to these return codes. It is in- 
voked by the main module. It gets everything it needs by means of appropriate function 
calls from the template generator module. 

3. DBASE.C: 

This module performs operations in order to store documents requested by user. 
In order to access documents in database, an index sequential access method has been 
used. 

The main assumption for this module is that the buffer that holds document in 
text form is visible to this module. In the implementation, each text to be stored is 
treated as a big string. It assumes that it terminates with null character which is the 
indication of the end of the string in C language. To store or retrieve any document 
from database, a global buffer is used. The files related to this module are shown below. 

1. DBASE. FIL: Data base file. It is used to store documents. 

2. INDEX.FI L: File that is used to keep keywords for database access. 

3. TEMPLATE. FIL: File in which template definitions take place. 

The key to database is a unique document number. When any document is 
saved, a keyword is entered by the user. The user interface module prompts the user to 
enter the keyword, gets the entry and stores it in a global buffer assigned for keyword. 
This buffer is known by the database module. The database module gets the keyword 
from the buffer and inserts it into a linked list which is data structure for holding 
keywords and index for each record. An index value for each record is the position in 
the linked list. When a document is requested, keyword is searched in the linked list, if 
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it is found according to position in the linked list, index sequential access is applied to 
the database file and the requested document is copied into a global buffer. The data 
structure is shown in Figure 3. 

When the program is first run, keywords and implicit index values are read into 
the the data structure. During the execution of the program, all additions and deletions 
are performed on the linked list. When the program terminates, the last position of the 
linked list is written back into the index file in the same order in the linked list. 

The appearance of the database file is a sequence of documents with a decimal 
number which indicates the size of each document and the document following it. The 
recently stored document is appended to the end of database file and the keyword asso- 
ciated with it is inserted at the end of the linked list. 

4. USERINT.C: 

All the user interface part of this program is performed by this module. It 
contains the function definitions for operations that require input or output. By using 
the field editing function, it allows the user to edit input and at the same time it permits 
the extra characters in the Turkish alphabet to be entered. All input operations that are 
limited to a certain size of characters are indicated by color and the input is checked by 
the field editor function. The simple error handling routine also takes place within this 
module. This is a general purpose error handling routine. When it is invoked by 
modules, this routine warns the user according to an error code determined by the calling 
module. 

5. SYSTEM. C: 

This module contains all hardware and operating systen dependent function 
definitions. From the portability point of view, all system dependent function calls take 
place within this module. BIOS video functions have been chosen so that they will op- 
erate both in video mode and text mode. All function and related service numbers for 
BIOS routines are defined in header files. Keyboard scan codes are defined within 
KEYDEF.H, BIOS functions and services are defined in BIOSLIB.H file. These two 
files are included in SYSTEM. H file. 

6. PRINTER.C: 

This module contains all function definitions for printer related functions. 
When printing any document is requested, it filters the text, seeks the ASCII codes as- 
signed for extra characters in the Turkish alphabet. If any special character is trapped, 
it calls the appropriate function that prints the font associated with that characters. 
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There are two functions that are known by other modules. These are 
print _page( ) and print Jile( ). The design assumption for these module is that when any 
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document is requested to be printed, this module knows that it is stored in a global 
buffer. As in the database module, each document in the buffer is treated as a big string. 
So in order to print a page which is either already edited or retreived from the database 
to browse , function print _page( ) gets the characters from buffer, prints them out by 
filtering the ASCII codes for special characters. 

Function print Jile( ) is designed in order to be able to print the file which is 
used to keep record of incoming documents. This function performs the same oper- 
ations by filtering and printing out special characters. The only difference is that this 
function gets the characters from file until the end of file rather than encountering the 
null character. 

The user is allowed to print out any document up to eight copies. The number 
of copies requested is entered interactively by user. By considering that the user may 
want to fill out any document, wanting to store rather than printing it out, zero will im- 
ply no printer output. Printing a file is limited to only one copy. Design of the special 
characters will be explained in Chapter IV. 

7. MYMAIN.C: 

This module constitutes the top of the program structure. It is the mirror of 
how the entire program is structured. In top-down design approach, this is the first step 
I took. 

This module contains only function calls rather than functions themselves. It 
knows the tasks performed by each module and interfaces modules according to logical 
order that is neccessary to perform the task. 

8. DLADT.C: 

This module is a general purpose double linked list implementation. Imple- 
mentation details are hidden from application side. The user of the module has to pro- 
vide some functions neccessary to apply abstract data type. The application side does 
not have to know the internal structure of the module. The functions that will be pro- 
vided by application side are the comparison functions and appropriate requests from 
module. 

The main idea in the design of this general purpose abstract data type is to have 
totally reusable module. It is implemented by taking advantage of the C language's 
features. It is written by using C language's generic pointer feature. The detailed ex- 
planation on the implementation of the module has been given along the source program 
as the comment. The data structure for double linked list is shown in Figure 4. 
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9. LLADT.C: 

This module is a general purpose linked list abstract data type implementation. 
It has been implemented by using C language's generic pointer feature. It is a totally 
reusable module. In this project, it is used by Dbase.C program module to hold 
keywords in order to implement index sequential access method for database access. 
The data structure for this module is shown in Figure 5. 

10. EGACHR.C: 

This program is separate from the program modules defined above. It is de- 
signed to create the extra characters in Turkish alphabet on the Enhanced Graphics 
Adapter. It is a memory resident program and it is run seperately from the main pro- 
gram. The detailed explanation on the implementation of extra characters will be pre- 
sented in Chapter IV. 

11. CGACHR.C: 

This is also memory resident program and designed to create the extra charac- 
ters on the Color Graphics Adapters. The detailed explanation on how to implement 
these extra characters will be presented in Chapter IV. 

D. PORTABILITY AND REUSABILITY ISSUES 

This particular application program is system dependent. In other words it is not 
portable to other systems. However, throughout this study, in order to make the pro- 
gram easy to port to other systems, in the design of the program these issues have been 
taken into consideration. PRPORT.H project portability header file is used for these 
purposes. Within this file, all portability issues considered throughout the project are 
defined. When this program is ported this file should be updated. 

From portability point of view, designer must think about the following things. C 
compiler dependency and system dependency. This program has been written in 
TURBO C. All built-in language functions used within the program are defined using 
ANSI standards and provided by all other C language compilers. None of the functions 
is unique to TURBO C. However, some reserved words that are not provided by other 
compilers such as 'void' take place in the PRPORT.H file and are replaced with appro- 
priate ones according to defined compiler in the same file. 

The second thing considered for the portability is the system dependency of the 
program. This dependency may show up in two different stiuations. First the repre- 
sentation of the data types in the language differs from system to system. The second 
is the presence of the system dependent function calls within the program. To eliminate 
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Linked list GDstract data type 




Application side 



Figure 5. Data Structure for Linked List Abstract Data Type 

tiie impact of the representation of data types, I defined my own data types within the 
PRPORT.II header file by taking advantage of C language's typedef feature. In the 
program, I used my own data type everywhere that is dependent upon the representation 
of data types on machine. And by forcing the compiler type casting on my own data 
type, I aimed to eliminate the impact of the representation of the data type on different 
machines. Before this program is ported to another system, user defined data types must 
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be redefined according to the new system. There is no need to make change within the 
program. 

This program contains many BIOS routine calls. These calls are specific to IBM 
PC and compatibles. I collected all BIOS and OS dependent functions within a single 
program component namely SYSTEM. C. Before the program is ported, all functions 
that take place within the SYSTEM. C program component must be replaced with the 
appropriate ones so that function name and the order of the parameters will remain the 
same. 
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IV. IMPLEMENTATION OF SPECIAL CHARACTERS IN TURKISH 

APHABET 



A. TO CREATE SPECIAL CHARACTERS ON SCREEN 

Programmers writing for the monochrome display adapter(MDA) and the color 
graphics adapter (CGA) are stuck with the character sets provided in those board's 
ROMs. If you want a different character set, for instance as APL users do, you have 
to replace the ROM. But there are various commercially available adapters today. On 
the Enhanced Graphic Adapter things are different. Fonts are "soft", meaning that al- 
though the ROM character generator is used by default, it can be replaced by a char- 
acter set of our choosing. In fact, EGA can support four different character sets. 

In this section, we will examine how to design our own custom fonts. For different 
adapters creation of special characters will be discussed. 

Only the monochrome adapter cannot display characters of programmer's own de- 
sign. The color card allows 128 user defined characters. PC jr allows 256, EGA allows 
1024, of which 512 may be on line at once. On the color graphic adapter, in text modes 
character sets in ROM are used by the system. There is no way to change this or replace 
by new fonts. But CGA allows user to define own custom character sets on graphics 
modes. In graphics mode, ROM contains data to draw first only 128 characters in the 
ASCII set (numbers 0-127). The second 128 characters can be redefined for our own 
purposes. System finds the table containing data drawing graphics characters via inter- 
rupt vector IF [Ref. 5: p.1-91]. 

Characters on graphics card and PC jr's are designed within a box that is 8x8 pixels. 
Eight bytes hold the data for each character. Each byte holds the setting for a row of 
pixels, starting with the top row, and the high bit corresponds to the leftmost pixel of 
the row. When the bit equals 1, the pixel shows. To design a character, the bit patterns 
for eight bytes must be determined and placed in sequence in memory pointed by inter- 
rupt vector IF. Figure 6 shows how extra characters in the Turkish alphabet are de- 
signed for CGA. To place user defined character table in memory, interrupt vector IF 
must be redirected so that I NT IF will point to the user defined new character table. 
This can be achieved either by some built-in function calls provided by some high level 
language or writing assembly language routine. In case that this is done with assembly 
language, we also need to make our table memory resident. But if this is implemented 
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in any high level language (in this study the C language), the new table can be held in 
an array and INT vector can be set to point to the array that contains the user defined 
character set data. 

In my approach. I implemented the character generator programs in the C language. 
These are memory resident programs and install our own characters. We need to define 
only 12 extra characters in the Turkish alphabet. Therefore, first I copied system de- 
fined graphics character table into array, then my own character table into an array. 
Before doing this we need to save the old interrupt vector value so that when program 
terminates we can have the system resume the original state. The next step is to change 
the interrupt vector so that it will point the array holding the character table data. But 
there is one significant point here. As stated above there is no way for us to use these 
characters in normal text mode. Therefore we need to change the video mode. In this 
particular example for IBM PC or compatibles, it should be set to video mode 6 which 
is black and white mode. In this program I utilized the built-in Turbo C language 
functions setvect(), getvect() to get old interrupt vector value and to change the inter- 
rupt vector to the user defined character table. Since the user defined character table 
will be held in an array and it will be in memory during the execution of program, I did 
not make this routine memory resident. 

The Enhanced Graphics Adapter is much more complicated and much more versa- 
tile. When a text mode is initialized, one of the two character sets ( 8x8 or 8x14 ) is 
copied from EGA ROM onto bit map 2 of the video buffer. This part of the buffer is 
treated as if it were broken into blocks, and the standard character set is placed in block 
0. Providing the EGA adequate memory, three more blocks of character data may be set 
up. The size of the block depends on the number of scan lines used in the character. 
Characters that are 8x8 need 8 times 256, or 2048 bytes. When more than one block 
of characters is enabled, bit 3 of the attribute byte determines which block will be used. 

Enhanced Graphics Adapter gives the user the ability to define his own character 
set. New character set can be placed at whatever position user chose within any block. 
And even if it overwrites the standard character set, it can be replaced at any time from 
ROM data. 

The most beautiful part of the things offered by EGA is that it gives the ability to 
replace the standard character set in text mode with one of chosen by the user. The 
EGA has BIOS support for the loading of an alternate character set through interrupt 
lOh, function 1 1 h, subfunction 0 [Ref. 6: p 4-1). We can make a call to this function 
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Figure 6. Memory and Screen Representation of Character for CGA 

with ES:BP pointing to table containing our own font in a format that will be explained 
below, DX set to the ASCII ordinality of the first character of our character set, CX set 
to the number of the characters in user defined character set ( maximum 256 ), BH set 
to the number of the bytes per character, and BL set to the block to load. These pa- 
rameters provide the BIOS with sufficient information to load the new fonts defined by 
the user. 
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Figure 7 contains data and the way that extra characters in Turkish alphabet are 
plotted. This figures assumes an enhanced color display in 25-line mode, in which each 
character is 14 scan lines high and 8 pixels wide. For EGA character box is limited 8 
pixels wide but can be defined up to 32 scan lines high. 

B. PRINTING SPECIAL CHARACTERS ON PRINTER 

In this section, I will explain how we can print out our own characters on the 
printer. First of all I would like to emphasize that by saying printers, I mean commer- 
cially available dot matrix printers. In this research I did not take bit map systems and, 
therefore, some printers called image writers into consideration. 

There are hundreds of printers available today. Although most of the commercially 
available printers offer various features, for this specific application area, we will not be 
using most of the features offered. The need for a different character set is partially met 
by those features. Most of the dot matrix printers provide user some character set rather 
than standard character set. These characters can be utilized by sending appropriate 
printer commands. For this application, we could make use of some of these characters 
namely international character set, provided by printer manifacturers. But this would 
not meet our needs for extra characters in Turkish alphabet. Therefore we have to find 
a way to print out some user defined characters which are not available in the printers 
ROM. This goal can be achieved by exploiting one of the features provided by printers. 

To print out characters which are not available in printers ROM, I took the fol- 
lowing steps. First, dot matrix printers offer the ability to print graphics. This shows 
us anything can be printed as defined by user. Before starting to explain the way I print 
out my own characters, we need to take a closer look at where dots are printed and how 
we can control them. When any character is sent to printer, it prints that character us- 
ing the dot pattern stored in its memory. In case that we want to print a pattern of dots 
that the printer does not have in its memory, we should control then the individual dots 
that are printed. Printer head usually consists of nine pins stacked one above the other. 
The print head therefore can print the columns of up to nine dots at a time. As plotted 
in creation of characters on screen section, if we plot the characters that will be printed 
we can print them column by column. Since print head will be printing column by col- 
umn, we need to first send the byte that defines first column of character box. When 
we draw our own characters, each strike of pins on the print head will be represented 
by l's. This technique is called dot graphics. In dot graphics, the line length and dot 
spacings are not fixed. We should tell the printer three things. First, which pins to print 
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Figure 7. Memory and Screen Representation of Character for EGA 



in each column, second, how closely to space the columns, and third how many columns 
there will be in the line. To tell all these things, appropriate printer commands, which 
are actually ESCAPE sequences, must be sent to the printer. 

After having briefly explained how we can use printers to print out some characters 
that are not available in printers' memory, now I can explain the approach taken in this 
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program. Figure 8 shows how extra characters in Turkish alphabet are plotted for 
printer. 

First step is to define characters on a 8x8 matrix. Second step is to calculate the values 
corresponding each column either in hex or decimal. There are two printer graphics 
mode: line and block graphics mode. I picked the line graphic mode. Since each char- 
acter is 8x8 dot matrix (therefore it will be 8 dots wide), 1 defined line length as 8 in line 
graphics mode. ESC sequences to tell printer these should contain the following values, 
number of dots per inch, line length. By sending the following command to the printer, 
we can tell the printer that leading 8 bytes will be printed column by column, in other 
words they will not be interpreted as regular ASCII characters. 

ESC 'K' nl n2 

If we interpret this, ESC 'K' means ' do not interpret the leading bytes as ASCII 
characters, and the line length is nl + ( 256*n2) [Ref. 7: p.6-47]. This is a general 
purpose command. Since we are going to use it to print our own characters the line 
length should be eight. If the hexadecimal or decimal values which corresponds the 
column values of new characters are sent to printer after following escape sequence, the 
character that is defined by user will be printed. After line length bytes printer resumes 
its previous mode. Since characters are printed in fixed dot density, even though letter 
quality is set to anything, they will be printed in fixed dot density defined by user. For 
this application program I picked the dot density as sixty dots per inch and regular 
characters will be printed standard mode. To make sure that printer is operated in 
standard mode, program sends the ESC sequence that sets the printer to standard mode. 
Telling printer which character will be printed as special character is under program re- 
sponsibility and the printer module handles everything. 
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V. USING THE DOCUMENT GENERATOR 



In Chapter III, the design and implementation details of this program have been 
discussed. In this chapter, what we have designed will be presented. This chapter briefly 
explains how to use the document generator software from user's point of view. The 
detailed explanation is presented in Appendix B as User Manual. 

The entire project tends to use microcomputers on board for tasks performed by 
ship bureaus. It allows the user to fill out document forms and to store them in a da- 
tabase, including the ability of using extra characters in the Turkish alphabet. All op- 
erations performed by this software appear in the main menu. The user can select one 
of these operations. These operations are: 

1. Preparing any document. 

2. Browsing any document from database. 

3. Entering incoming document log. 

4. Printing incoming document log file. 

5. Quit 

This program tends to be user friendly. User is prompted for each step to be taken. 
All operations performed by this program take place within main menu. Main menu is 
the starting and ending point of each operation displayed in main menu. The program 
will be executed until the user enters the Quit option. 

In order to prepare any document, option one should be selected. User will be 
prompted to enter appropriate form number after program displayed all templates that 
exist in TEMPLATE. FIL. If there is more than one screen full template definition, 
program automatically provides user to view one screen full at a time. The form that 
corresponds to the number entered by user will be displayed and the editing session will 
start. User will be allowed to edit each field displayed on screen and to go back and 
forth among the field. User will not be allowed to overwrite non tillable fields during 
the editing session. He will be warned by sound in any attempt at overwriting. After 
completion of editing session, user will be prompted if he wants to print it out. If he 
wants to print out, program will print out the currently edited document with as many 
copies as requested. Zero implies no printer output. Next step is to get user request if 
he wants to store it in database. If it is requested to store it in database, after getting 
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the document id for document (which is key to database access), it will be stored in da- 
tabase file and program will go back to main menu for next operations. 

Another operation is to browse any document previously edited and stored in data- 
base. When this option is requested, user will be prompted to enter document id asso- 
ciated with request. Program will access database file according to keyword entered by 
user and retrieve the document into program buffer then display it one screen full at a 
time. User will be allowed to print the document browsed and he will be promted for 
print option as in option one. Zero will imply no printer output and program will go 
back to main menu for next operations. 

There is no feature for retyping all incoming documents. Program will only provide 
a mechanism to keep records of all incoming documents. In option three, user can enter 
all information about incoming document. He is allowed to edit. The user input then 
will be appended to DOCLOG.FIL. 

The fifth option provides user to print all incoming document information entered 
by option three. User will not be promtped for the number of copies. Program will print 
only one copy of the DOCLOG.FIL. 

Program terminates after option five is selected. All document id's entered during 
the execution of program will be updated before program terminates. 

The detailed explanation on operations performed by this program will be presented 
in Appendix B, User Manual. 
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VI. CONCLUSIONS AND RECOMMENDATIONS 



The objective of this study is to design and implement a software for an automatic 
document generator supporting extra characters in the Turkish alphabet. In this study, 
I mainly focused on IBM personal computers to create our own characters. Being able 
to use the Turkish alphabet on computers was only one part of the project. There were 
several goals in the design and implementation of the program. The first part is to be 
able to use extra characters in the Turkish alphabet. This part includes two different 
hardware components. The system on which program is running and the printers to be 
used to print characters. This part of the problem is totally hardware dependent. 
Throughout this study, I focused on IBM personal computers to create extra characters 
in the Turkish alphabet on the screen. For printers I took the dot matrix printers. Since 
the dot matrix printers vary among themselves according to manifacturers, I considered 
three main types of dot matrix printers. These three types of printers are commercially 
available and widely used, respectively EPSON, IBM proprinter, OKIDATA dot matrix 
printers. 

To expand this project, the hardware dependency of creating extra characters on 
screen can be reduced by expanding this study to other systems that are available today. 

The second part of the problem is to meet user needs to generate and process doc- 
uments. This program is designed to generate documents with only a single page length. 
This program can be developed so that there will be no limitation for the length of the 
document format. To process documents, to store them in database and to meet user 
needs, in database implementation of this project, the index sequential access method 
has been used to retrieve any document from database. To expand this project, data- 
base routine should be implemented by using a B-tree to achieve better disk access to the 
database. 
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Vf PEiNDIX A. TURKISH AP11ABET 



abccdefggh 

ABCCDEFGGH 



mnooprsstu 

MNOOPRSSTU 



1 i j k 1 

I I J K L 

u v y z 

U Y Y Z 
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APPENDIX B. USER MANUAL 



A. INTRODUCTION 

This program attempts to provide all operations performed by ship administrative 
offices to generate and process documents. It is designed so that it will be user friendly 
and interactive program. Basic features provided by the program are displayed in the 
main menu. The main menu is the starting and ending point of each operation until 
Quit option is entered by user. User will be prompted during the execution of each op- 
tion on the main menu according to logical sequence of the operation performed in real 
time. 

B. REQUIREMENTS 

This program is designed for IBM personal computers and DOS environment. The 
following conditions must be checked before the execution of program: 

1. All program files must be in the same directory. Program files and their de- 
scriptions are as follows. 

a. YAZIBURO.EXE: Main executable program file. This is the file to be run. 

b. TEMPLATE. FIL: File in which all template and form definitions take place. 
This file must exist in order to be able to fill out some documents. The absence 
of this file implies that there is no template definition for program to display. 

c. INDEX. FIL: This file is used to keep keywords for database access. It does 
not have to exist when program is first run. However, it must exist along with 
DBASE. FIL if there is any document edited and stored in database. The pres- 
ence of either INDEX.FIL or DBASE. FIL will imply that there was at least one 
document stored in database file and one of these files is missing. 

d. DBASE. FIL: This file is main database file and it is used to store all documents 
requested to be stored. 

e. EGACHR.EXE: Executable file that creates extra characters in the Turkish al- 
phabet. It can be used independently in order to prepare new templates by us- 
ing any word processor. It will be installed by program when it is used for 
document generator purposes. 

f. CGACHR.EXE: Executable program that creates extra characters in the 
Turkish alphabet. Its usage is the same with EGACHR.EXE. 

2. Maintenance of the program files is under user responsibilty. 

3. System should be equipped with either CGA or EGA in order to be able to display 
extra characters in the Turkish alphabet. Program will automatically terminate if 
these conditions are not met by the system. 
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4. All template definitions must be entered correctly. Detailed explanation on how 
to prepare template will be presented later. 

5. Printer attached to the system should be a dot matrix printer. 

C. GETTING STARTED 

The complete list of the program files has been presented in section B. The execut- 
able program name (YAZIBURO) must be entered in DOS command line in order to 
run this program. Main menu will be displayed as soon as program is run. Main menu 
contains all operations performed by this program. User can choose the operation from 
main by simply entering the number associated with the request after the program 
prompt. The logical sequence of the events to perform any operation on main menu are 
as follows: 

1. PREPARING ANY DOCUMENT 

a. Choose the document form and enter the choice after program prompt. 

b. The form of document will be displayed. 

c. Fill out document. 

d. Print it out. If the printer output is not requested, zero will imply no printer 
output. 

e. Do you want to save it? If the answer is 'yes', enter the keyword for the docu- 
ment to be saved after program prompt. 

f. Go back to main menu. 

2. BROWSING ANY DOCUMENT FROM DATABASE 

a. Enter the keyword associated with the document. 

b. If attempt is succesful, browse the document. 

c. User may want to obtain print out. He will be prompted to enter the number 
of copies to be printed. Zero will imply no printer output as in option one. 

d. Go back to main menu. 

3. ENTERING INCOMING DOCUMENT LOG. 

a. Prompts the user by displaying the fields in incoming document log. 

b. Enter the information about the incoming document. 

c. After hitting the RETURN key, go back to main menu. 

4. PRINTING INCOMING DOCUMENT LOG 

a. When option four is selected, program will automatically generate one copy of 
printer output of incoming document file. 

b. Go back to main menu. 
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5. EXIT TO DOS 

a. This option is used to terminate the execution of the program. 

User will be prompted according to logical sequence of the events presented above 
during the execution of the program. Each operation will be explained in detail below. 

1. ENTERING EXTRA CHARACTERS IN THE TURKISH ALPHABET 
There is a one to one relation between extra characters in the Turkish alphabet 

and the ones in English. In the design of this program, by taking advantage of this 
similarity, extra characters in the Turkish alphabet will be entered as ALT key and the 
similar letter in English combination. CAPS LOCK and the SHIFT keys on the regular 
keyboard layout will function same way. 

1. ALT-c : will display the letter c. 

2. ALT-C : will display the letter Q. 

3. ALT-g : will display the letter g. 

4. ALT-G : will display the letter G. 

5. ALT-i : will display the letter i. 

6. ALT-I : will display the letter I. 

7. ALT-o : will display the letter 6. 

8. ALT-0 : will display the letter O. 

9. ALT-s : will display the letter s. 

10. ALT-S : will display the letter $. 

11. ALT-u : will display the letter u. 

12. ALT-U : will display the letter 0. 

2. USING DOCUMENT GENERATOR 
a. PREPARING DOCUMENT 

Option 1 provides user to fill out any document whose definition takes place 
in TEMPLATE. FIL. All templates that take place in TEMPLATE. FIL will be dis- 
played. User will be asked to enter the number of his choice. Program will automat- 
ically provide a mechanism for user to view all templates available. When there are more 
than one screen full template names, program will display one screen full template names 
at a time. The form of the document requested by user will be displayed. Program will 
automatically color the spaces to be filled out by user. Cursor will be on the first field 
to filled out. Program will prevent user from overwriting on non-fillable fields of docu- 
ment form. Cursor will automatically go to the next editable field after the user hits the 
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RETURN key. User is allowed to go back and forth among the fields by using defined 
keys in order to correct typos. 

Program defined keys and the editing features provided by program are as 

follows. 

1. ESC key: Will cancel all input for the current field. 

2. HOME key: Will take the cursor to the beginning of the current field 

3. CTRL-EN'D: When the combination of CTRL-END keys is entered, it will termi- 
nate the editing session. 

4. DEE key: allows deleting character at the cursor position. 

5. UEFT ARROW: Moves the cursor to the left. 

6. RIGHT ARROW: Moves the cursor to the right. 

7. UP ARROW: When UP ARROW key is hit, editing session of the current field 
will terminate and this key will allow user to go one editable field back. If there is 
no editable field to go, user will be warned by sound and cursor will stay at the 
same field, 

8. DOWN ARROW: will terminate the editing session for current field, and will move 
the cursor to next editable field. If there is no field to go, user will be warned by 
sound and cursor will stay at the same field. 

9. SPACE BAR: Will either move cursor or make room for characters to be inserted. 

10. PAGE UP: Will display the previous video page. If the current page is the first 
page, user will be warned by sound and current page will remam active. 

11. PAGE DOWN: Will display the next video page. If the current video page is the 
last page, user will be warned by sound and current video page will remain active. 

User can edit each field by using program defined keys listed above. Editor 
is always in insert mode. After having filled out all necessary spaces on the form of 
document, user can press CTRU-END to terminate editing session. User will be 
prompted for printer request as next step. Program prompt for printer request : 



Howtnany copy do you want = = > _ 

Zero implies no printer output ! 

User will enter the number of copies he wants to print out after the program prompt 
shown above. Program will execute the user request and then prompt user if he wants 
to store the currently edited document in database. If user wants to store the document 
in database, he should enter the keyword after program prompt. User is allowed to edit 
all entries by using program defined keys presented in section 2. Program will go to 
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main menu for next operation after saving the document in database. If user requests 
more than one copy of printer output, 

program will print out up to maximum eight copies by automatically providing/crm feed. 

b. BRO ) VSING ANY DOCUMENT FROM DA T ABASE 

Program allows user to view any document previously edited aad stored in 
database. This can be done by selecting Option 2 from main menu. Appropriate 
keyword must be entered in order to browse any document from database. User will be 
asked to enter keyword for the document to be viewed. User is allowed to edit his entry 
as in section two. All keys defined can be used. Program will get the document id and 
retrieve the document and then display it one screen full at a time. User will be 
prompted to see next page. 

This operation will allow user to view rather than edit or change the con- 
tents of the document. However user can print it out as many copies as he wants. 
Program will prompt the user and print the document according to user request. Zero 
will imply no printer output as in Option 1 . Program will go to main menu after per- 
forming request by user. 

c. ENTERING INCOMING DOCUMENT LOG 

Program provides a mechanism to keep record of all incoming documents. 
Since there is no use to retype all incoming documents, it basically allows user to enter 
all information about incoming documents. This can be done by Option 3. When this 
option is selected by user, program will display the following: 

ENTER ALL INFORMATION ABOUT THE INCOMING DOCUMENT 
DOCUMENT ID FROM DATE 



User will fill out the spaces as indicated above. All program defined keys can be used 
to enter the information about the incoming document. It is under user responsibility 
to format the entry. Program will save the entry as it was entered. 

d. PRINTING INCOMING DOCUMENT LOG 

Option 4 provides user to print out all informations about incoming docu- 
ments. Program will print one copy of DOCLOG.FIL which holds all informations 
about incoming documents entered by Option 3. User will not be prompted for the 
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number of the copies. Program will print only single copy of this file and then go back 
to main menu. 

e. EXIT TO DOS 

Option 5 terminates the program and takes user back to DOS command 
line. Program updates the program files before it terminates. 

3. HOW TO PREPARE NEW TEMPLATE 

In this section, how to prepare new template will be explained. This program 
will run for the template definitions already existing in Template. Fil. User can easily add 
new templates to the system according to what they need. User should not forget that 
program always assumes template definitions have been entered correctly. All templates 
must be defined to the system as described below. 

All template definitions take place in TEMPLATE, FIL. New templates can be 
added to already existing ones by using any word processor. Before starting to explain 
rules on defining new template to the system, it is better to give a brief explanation on 
terminology used here. 

Each document form consists of fields. A field is the smallest unit on this form. 
A field consists of a field message and a field reply. Field message is the string appeared 
on the blank form of the document. Each entry that user will fill out constitutes a field 
reply. A field can be either editable or noneditable. 

The noneditable fields are the ones the user is not allowed to edit. The location of each 
field is given by the coordinates with respect to page format. Each field has to have row, 
column and width values associated with itself. 

Figure 9 shows the components that are necessary to define any field. 

In order to prepare a template the following steps should be taken. Each form 
of document should be broken into fields. The components of each field must be de- 
termined. All components of a field must be appended to Template. fil according to the 
following rules. 

1. Each template definition must have unique name and its name must be defined 
prior to field definitions. All template names must start with character and in 
the first column. Program will display all template names by checking if their first 
characters are or not. 

2. Each field must be entered in a single line. 

3. User is allowed to put comments anywhere in the file as long as it starts with 
and it starts in the first column. All lines whose first character are will be 
skipped by program. 
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4. The order of the field component values is very important. The order must be as 
follows: 

Field row column width editable @ field message @ 

5. Field messages must begin and end with the special character 

6. Field width must be determined so that it will be large enough to hold both the field 
message and the field reply that will be entered by user when it is editable. 

7. Field status can be either one or zero. One should be entered for the ones that user 
is allowed to edit. Otherwise it will be zero. 

8. The order of each field is not important. It can be entered in any order. However 
the order of the field components must be entered as in the example. 

* This is a comment line. 

* row column width editable field message 

5 50 20 1 @Date : @ 

Example field definition defined according to rules above indicates a field start- 
ing at row 5, column 50, total width 20 characters and field message is Date: 
This shows that field message will be displayed on specified coordinates and user will fill 
out width - message length= 14 characters length space. Example template definition 
and program output document are presented in Appendix D. 
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APPENDIX C. PROGRAM LISTINGS 



Source listings of program modules are given in the following order. Relation 
among the program files can be found in MAKEFILE. The order of program listings 
is according to program structure. All program files are listed after program modules. 

• MAKEFILE UTILITY 

• MYMAIN.C 

• TEMPLATE. H 

• TEMPLATES 

• EDITOR.H 

• EDITOR.C 

• DBASE.C 

• PRINTER.C 

• SYSTEM. H 

• SYSTEM. C 

• DLADT.C 

• LLADT.C 

• EGACHR.C 

• PRPORT.H 

• KEYDEF.H 

• MYASCII.NUM 

• EPSON.DAT 

• EXTRA. FNT 
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MAKEFILE FOR PROJECT 



# 

# 

# 

# 

:r 

n 



# The order to search for rules and files is specified by . SUFFIXES 
FFIXES : . exe . obj . c 

# program files and their dependencies, 
raymain. obj: prport. h 

template. obj: template, h prport. h keydef. h bioslib.h 
editor, obj: editor, h prport. h keydef. h bioslib.h myascii. num 
userint.obj: prport. h ' 

dbase. obj: prport. h 

printer. obj: prport. h myascii. num extra, fnt epson.dat 
system, obj: system, h prport. h keydef. h bioslib.h 
dladt. obj: prport. h 
lladt. obj: prport. h 



# Files 

FILES= system template editor mymain userint printer dbase dladt lladt 

# Object files 

OBJS= system. obj template, obj editor, obj mymain. obj 
userint. obj printer, obj dbase. obj dladt. obj lladt. obj 



ir Libraries 

LIBS= emu math$(MDL) c$(MDL) 



ir Model definition is SMALL for Turbo -C 
MDL = s 

# make is : 

# MAKE = ndmake 

# plink is : 

# PLINK = tlink 
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all: Yaziburo. exe 



Yaziburo. exe: $(OBJS) 

tlink cO$(MDL) $(FILES) $(LIBS) 



c. obj : 

tcc -c -m$(MDL) $* 

clean: 

del mymain. obj 
del system, obj 
del template, obj 
del editor. obj 
del printer. obj 
del dbase. obj 
del userint. obj 
del dladt. obj 
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^Vc*^^V*****Vc********^V***VcVc‘3V**3VVc**’)V’)VVc‘3V*‘3V'5V‘5V*Vf‘)V*5V‘3VVc**VcVfVf**Vf*Vf i >V**Vf*Vf*VcVr* 



MODULE : MYMAIN. C 

VERSION: 1. 0 

AUTHOR : Metin AKINCI 

DATE : 31 MAY, 1988 

EXPLANATION: 

Main project module. 

Interfaces modules and prepares program buffers. 
CHANGE LOG: 



■jV Yc Y? Yc Yc “jV Yc Yr Yr Yr *jV Yr Yr Yc Yc Yc Yc Yc "jV Yr Yc Yc Yc Yc Yr Yr Yc Yc Yc Yc Yr "5 V Yr 'sWrVc^V'sV^V "sV'sV Yc Yr -5V Yc Yc Yc Yr Yc Yc Yr Yr Yr Yc Yr Yr Yc Yc Yc Yc Yc Yr Yc Yc Yc Yc j 



//include "prport. h" 
//include <stdio. h> 
//include <mem. h> 



/* 



External Function Definitions 



extern Void 
extern Void 
extern Void 
extern Char 
extern Int 
extern Bool 
extern Void 
extern Void 
extern Void 
extern Bool 
extern Int 



editpage(); 
start_up( ); 
print_page( ); 
*con_text( ); 
getrequest( ) ; 
ifsave( ); 
enterlog( ); 
deallocate(); 
allocate( ); 
loadtemplate( Int) ; 
gettemplate( ) ; 



*/ 



/* Buffer pointers which are visable to other program modules */ 
Char *TEXTBUF; 

Char * KEYWORD; 



/* Define Size of Program Buffers */ 

//define KEYSIZE 12 
//define BUFSIZE 3500 

/* Define function prototypes */ 

Void allocbuf(); 

Void deallocbuf ( ) ; 

Void f lushbuffers( ); 
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main( ) 

{ 

Char ch; 

Bool done; 

done=FALSE; 

/* initialize the modules */ 

allocbuf ( ); 
loadindex( ); 
while (!done) 

switch (getrequest( )) 

case 1: tempinit(); /* Prepare document */ 

if (! loadtemplate( gettemplate( ) ) ) 



error((Int) 2) 
break; 

} 

start_up( ); 
editpage( ); 
con_text( ); 
print_page( ); 
if (ifsave()) 
savedoc( ); 
deallocate( ); 
break; 

case 2: 

getkey2db( ); 
if (browse()) 
print_page( ); 







break; 


case 


3: 


enterlog( ); 
break; 


case 


4: 


print_f ile( ); 
break; 


case 


5: 


done=TRUE; 

break; 


default: 


break; 



f lushbuf fers( ); 

updateindexf( ); 
deallocbuf ( ); 



/* Browsing a document */ 

/* Entering an incoming document*/ 
/* Printing incoming doc file */ 
/* Return to DOS */ 
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^ ************************************************************ 
ALLOCBUFQ: Allocates program buffers. 

************************************************************* j 



Void 

allocbuf ( ) 
{ 



KEYWORDS Char *)malloc(KEYSIZE); 

TEXTBUF=(Char *) malloc(BUFSIZE); 
if ((! KEYWORD) || ( ! TEXTBUF) ) 

printf(" there is no enough memory, program exiting.") 
exit(O); 

memset (KEYWORD, ’ 0’,KEYSIZE); 
memset ( TEXTBUF, ' O' ,BUFSIZE); 



j ************************************************************ 

DEALLOCBUF( ) : Deallocates program buffers. 

************************************************************* j 



Void 

deallocbuf( ) 

{ 

free (KEYWORD); 
free(TEXTBUF); 

/************************************************************ 
FLUSHBUFFERS( ): Clears program buffers. 

************************************************************* j 



Void 

f lushbuf fers( ) 

mems et( KEYWORD, ’ 0* ,KEYSIZE); 
memset (TEXTBUF, ' 0’,BUFSIZE); 
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j Vr*Vc^V*Vf*^VV< , VcVc^VVc'*VcVf*VrVf*Vf*Vc*VcVcVcVfVc*VcVoVVfVcVcVr**Vr^VVfVrVf*VfVcVc**'5VVc , *Vc , '3V , ;V* , 3V*Vc*'3V* 



MODULE : TEMPLATE. H 
VERSION: 1. 0 
AUTHOR : Metin AKINCI 
DATE : 15 MAY, 1988 
EXPLANATION: 

Contains all definitions and declarations 
for TEMPLATE. C Module. 

CHANGE LOG: 



//include "prport. h" 
//include "keydef. h" 
//include "bios lib. h" 



//include 

//include 

//include 

//include 

//include 

//include 



<stdlib. h> 
<alloc. h> 
<conio. h> 
<stdio. h> 
<mem. h> 
<string, h> 



/* program defined header files*/ 



/* Compiler header files. */ 



char * TEMP LATE_FILE="temp late, fil"; 

/* define filename for templates */ 



typedef struct Field„record 



Int 


row; 


/* 


field start row number 


*/ 


Int 


column; 


/* 


field start column number 


*/ 


Int 


width; 


/* 


field width 


*/ 


Char 


*msg; 


/* 


pointer to message buffer 


*/ 


Char 


*reply; 


/* 


pointer to reply buffer 


*/ 


Bool 
} Field 


editable; 

9 


/* 


If 1 then editable else not 


*/ 



Field *PagePtr[ 3] ; 


/* 


Video page pointer 


array 


*/ 


GLOBAL Int PG; 


/* 


Video page counter 




*/ 


typedef char dlist; 
dlist *mylist; 


/* 


generic pointer to 


dllist 


*/ 
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GLOBAL extern Char *TEXTBUF ; /* pointer to buffer 



*/ 



/* Function prototypes 



*/ 



extern Void putcur( Int, Int); 
extern Void clrscrn(); 
extern Void ring_bell(); 
extern Void writea( Int, Int); 

/* Function prototypes for DLADT. C */ 

extern Field *dl_f ind( char *, Field *,int (* f ieldcomp) ( ) ) ; 

extern Bool *dl_add(char *, Field *,int (* fieldcomp)( )); 

extern Bool *dl_delete(char *, Field *,int (* fieldcomp)( ) ); 

extern char *dl_alloc(); 

extern Bool *dl_free( char *); 

extern Field *dl_next( char *); 

extern Field ,v dl_prior( char *); 

extern Field *dl_first( char *); 

extern Field *dl_last( char *); 

extern Field *dl_curr( char *); 
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/*************************************************************** 



MODULE : TEMPLATE. C 
VERSION: 1. 0 
AUTHOR : Met in AKINCI 
DATE : 15 FEB, 1988 
EXPLANATION: 

This module contains the data structure 
holding template informations and provides the 
other modules functional interface by hiding 
the data structure. All operations on data 
structure are defined as a function within 
this module. 



CHANGE LOG: 



**************************************************************** j 



^include <template. h> 
Void dispPage( Int); 



TEMPINITQ : Initiliaze the module variables. 

**************************************************************** j 



Void 

terapinit( ) 



PagePtr[ 0] =NULL; 
PagePtr[ 1] =NULL; 


/* 


initialize page pointers 


*/ 


PagePtrf 2] =NULL; 
PagePtr[ 3] =NULL; 
PG=0; 


/* 


initialize page counter 


*/ 


mylist=dl_alloc( ); 
if ( ! mylist) 


/* 


create double linked list 


*/ 


exit(0); 


/* 


if fail to create dllist 


*/ 
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FGETLINEQ : Read line from file. Returns 0 if eof. 

iV VoV ■;> Vc iV Vc Vr Vc *V * -.V Vc V* :>V * * Vc * Vr V? Vc ?Wc *jWc * Vc* Vc* Vc * Vc Vc Vc ->V Vc Vc -V Vc * Vc ->V ->V Vc ->W- VcV- -V Vr ■>’<■ Vc Vc Vc Vr Vc iWc Vc -V -V * j 



Int 

fgetline( fp , s , limit) 
FILE *fpj 
Char *s; 

Int limit; 



int c , i; 



i=0; 

while (i<limit-l || !feof(fp)) 

c=fgetc( fp); 
if (c— 1 n’) 
return( i); 
s[i]=(Char) c; 

++i; 

} 

if (feof(fp)) 
return(O); 



return( i); 

} 



j * * -k “3 V Vc * ic b Wc Vo V Vc * Vr * * 7 V * Vc * tV * -5 V Vr Vr 7 V * -j V * * 7V tV 7V 7V -jV * 7V tV 7V 7 VVo V ■> V 7V 7 V ic tV 7V * 7V Vc 7 V 7V 7V * 7V 7V 7V 

FIELDCOMPC): Compares two field. Used by DLADT. C. 

*Vc********V*****************^V***********V«V********Vc************Vr** j 

int 

f ieldcomp( fieldl , f ield2) 

Field *f ieldl ,*f ield2; 

if ( f ieldl->row! =field2->row) 

return( f ieldl->row - field2->row); 
return( f ieldl->column - f ield2->column); 

} 
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PARSELINEQ: 

This function gets input line and parses it in order to find 
field message string defined within two special characters (@. .(§). 
Returns the message string without @ character. 



^WtVfVf^WcVc^^WcVcVc^f^rtWcycVfVf' 



Vf'sVVf'jV's’c^V'sV'sVVfVfVc’Vfyf^WrjV'sWrsV'sWf'sWrsWc'sWr 



■V«WoVtoV*?Wc^MVV«V J 



Char * 

parseline( line , fb) 
Char *line; 

Char *fb; 

{ 

Char *walkptr; 



walkptr=line; 



/* set walkptr 



*/ 



} 



while (*walkptr! = '(§' ) 
-H-walkptr; 

++walkptr; 

while (*walkptr! ='@' ) 

{ /* 

*fb=*walkptr ; 

++fb; 

^ -H-walkptr; 
return( fb); 



/* skip all characters until the*/ 
/* beginning mark of msg string */ 
/* skip (§ mark */ 

/* get message characters until */ 
the end mark of message field*/ 
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y*^V*****VcVc*******^V*****^V**^VVf*Vc*VcVf**^VVc******VcVc******Vc* , }V , >V**Vf* , 5V'5V* < 5V*Vc* 

SHOWTEMPLATES( ) : Displays all template names in template. fil. 

Assumes all lines whose first character is # 
are template names. Displays string after #. 
Provides --more-- facility if there is more than 
one screen full template names. 

VcV?V-V-**Vc*VcVf*Vc***V-*VfVc*VcVc^V*V?*VcVcVrVrVcVrVcVr**VrVr*VrVc*Vf*VcVf*VcVf*Vc*Vc***VrVfV-*-V , 5V , ;VVfpVVr J 



Void 

showteraplates( ) 

FILE *fptr; 
int tnum; 

Char *line,*readline; 



f ptr=f open( TEMPLATE_FILE , " r” ) j 
if ( ! fptr ) 

error((Int) 1); 
return; 

readline=(Char *) malloc(80); 
memset( readline , ' O', 80); 
line=readline; 
tnum=l; 

while ( fgetline( fptr , line, ( Int) 80)) 

{ /* while not EOF read lines */ 

if ( line[ 0] ==' #' ) /* if new template definition */ 

{ /* display it with order number */ 

printf(" n%d %s n" ,tnum,( line+1) ); 
tnum=tnum+l; 

if (!(tnum % 12)) /* control scrolling */ 

printf(" n%s"," to see more hit any key "); 

^ getche(); 

memset( readline, ’ O' ,80); 
line=readline; 

printf(" n n%s n" to continue hit space bar — --"); 
free( readline); 
getche( ); 
fclose( fptr); 
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fit it it it it it it itit it it it it it it it it it it it it * it Vc Vc }V * it ieicie it it it it Vr it -jV iV ■jV Vr it “V ■> V’jV it it it it it ? V tVtV tV ** * Vr/? ?r it 



LOADTEMPLATE( ) : 

Gets the template information from file line by line, 
all field information into data structure. Cooperates with 



DLADT. C. 

it it itit it it it it it it • 



In case of failure returns false. 

it it it it it itit it it it it it it it it it it it it it it it it it it it it it itit it it it it it it it itit it it it it it it ' 



• it it it it it it it it it J 



Bool 

loadtemplate( request) 

Int request; 

FILE *fptr; /* pointer to template in file */ 

Char ch; 

Char *readline,*line; 

Int l,r,c,w,e,i; 

Field *temp; 

Bool flag, done, neof; 



fptr=fopen(TEMPLATE_FILE , "r"); 
if ( ! fptr) 

return( FALSE); 
if (request=0) 
r eturn( FALSE ) ; 

/* prepare buffer for input line*/ 
readline=(Char *) malloc(80); 
memset( readline, ’ O', 80); 
line=readline; 



i=0; 

do 

{ 

f lag= fgetline( fptr, line, ( Int)80); 

if ( ! flag) /* if EOF then return NULL */ 

return(FALSE) ; 

if ( line[ 0] ='#' ) /* if template definition */ 

^ i=i+l; 

while (i<request); 
done=FAI.SE; 
while (!done) 

{ 

if (! fgetline( fptr , line, ( Int)80) ) 

/* read line from template file */ 

return(TRUE); 



/* if not eof then */ 

switch (line[0]) /* evaluate the line */ 

case '*': break; /* skip comment line */ 

case done=TRUE; /* new template definition */ 

break; 

default : /* load the field definition */ 

temp=(Field *)malloc( sizeof (Field) ); 
if ( ! temp) 

printf(" n out of memory n"); 
printf(" n program exiting.."); 
exit( 0); 
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} 



/* return to DOS */ 

sscanf ( line , "%d%d%d %d" , &r , &c , &w ,&e) ; 
temp->row=r; 

/* row number of field */ 

temp->column=c; 

/* column number of the field */ 
temp->width=w; 

/* width of the field */ 

temp->editable=e; 

/* flag for if it is editable */ 



/* dynamically allocate buffer */ 
/* for both message and reply */ 
temp->msg= (Char *)malloc(w+l); 
memset(temp->msg, ' O' ,w+l); 
parseline( line , temp->msg) ; 
temp->reply= (Char *)malloc(w+l); 
memset( temp->reply , 1 O' ,w+l); 

/* add the field record to list */ 
dl_add(mylist, temp , fieldcomp); 

/* set video page pointer */ 




} 



PagePtrf 0] =temp; 
PG=PG+1; 



else if (PG>3) 

{ 

error((Int) 4); 
return(FALSE) ; 

} 

else if ( r/( PG*25) ) 



{ 



} 



PagePtr[ PG] =temp; 
PG=PG+1; 



break; 



memset(readline, 1 O', 80); 
line=readline; 



} 

f ree( readline) ; 
fclose( fptr); 
return(TRUE) ; 
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/***************************************************************** 
GO_PRIOR( ) : 

Set the current field pointer to the prior field. 

If there is no field to go, warns user maintains current field. 

********** *** ****** ********** ** * ************* * ******************** j 



Void 

go_prior( ) 

Field *curr,*temp; 



curr=dl_curr(raylist); /* save the current field */ 

temp=dl_prior( my list ) ; 
while (temp) 

if (PG>0 && temp<PagePtr[ PG] ) 

PG=PG-1; 

dispPage(PG); 

return: 

} 

if (temp->editable) /* if there is no field to go */ 

return; 

temp=dl_prior(mylist); 

} /* do it until next editable field*/ 

ring_bell(); /* warn the user and */ 

dl_find(mylist ,curr , fieldcomp); 

/* resume the original position */ 

return; 



/****************************************************************** 

GO„NEXT(): 

Set the current field pointer to the next tillable field. 

If there is no field element to go, warns the user by sound. 

******************************************************************* j 

Void 

go_next( ) 



{ 

Field *curr,*temp; 

curr=dl_curr(mylist); /* save the current field */ 

temp=dl_next(mylist); 



while (temp) 

if (PG<3 && temp=PagePtr[ PG+1] ) 

PG=PG+1; 

dispPage(PG); 

^ return; 

if ( temp->editable) /* seek for next editable field */ 

return; 

t emp=d l_next ( my 1 is t ) ; 

} /* seek next editable field */ 

ring_bell( ) ; 

dl_find(mylist , curr , f ieldcomp); 
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return; 

} 



/* if there is no field to go */ 
/* resume the previous position */ 
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GFWIDTHC): Returns the field width ( range of field ) 

*Vf^V**^V*^V^V****VcVc^V***^V*^V^V**^V*Vr***^V**^V^V^V*^V^V*** , 3V , 5V , 5V*;V , 5V*'5V** , )V , sV , 5VV«V , 5V , )V^V* , )V-V* , 5V* j 

Int 

gfwidth( ) 



} 



Field *temp; 
temp=dl_curr(mylist); 
return( temp->width) ; 



GFCOL(): Returns current field column number. 

^V^V^VVf^VVc^VnV^V^VWVwVVnV^V^V^^V^V^V^VV^VVfVc^^VVc******^^**^*****************'*****^? j 

Int 

gfcol() 



} 



Field *temp; 
temp=dl_curr(mylist); 
return( temp->column); 



J ^^'k'k'k'k'k'k'k'ivk'k'k^'k'k'k'k'k'k'k'^'k'k'k'k'k'k'k'k'k'h'k’k'i^'k'k'k'k'k'k'k'k'k’k'k^'k'k'k'k'k'k'k'k'k'k'k^'k'k'k'k'k'k 

GFR0W(): Gets field starting row number and returns it. 



Int 

gf row( ) 

Field *temp; 
temp=dl_curr(mylist); 
return((Int) (temp->row) % 



25 ); 



l^^^^^^^^^^^'k'k'k'k'k'k'k'k'it'k'^'k'k'k'ix'k'kit'k'k'k'k'k'k'k'k^'k'k'k'k'k^'k'k'k'k'k'k'kix'k'k'k'k'k'k'k'kit'k'it'k'k 

GFREPLYQ: This function returns the field entry edited by user 

It is going to be used when it is needed to be reedited. 



Char * 
gfreply( ) 

Field *temp; 

temp=dl_curr(mylist); 

return(temp“>reply); 
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y*^V*^VV?VfV« , VfVc^V*Vf*Vc*VTyfVcVc*Vc****VcVcVf**VcVc*V(rVr^V**Vc^V*^V*VfVcVcV(r**Vf^VVcVt*VcVcVtVcVfVcVc , VcVc , jV 

GFMSGQ: Returns the field prompt 

*> V Vc ■s'? *?V tc Vr Vc tV Vc tV t V Vc -V -,V “V Vc Vr "V 'V ic Vc Vr Vc ‘V t V Vr Vr Vc 'V V? V; Vr Vc 'V t V Vr * V? -5 V ->V vc Vr * V Vc ? V V? V? ■? Wc Vt t V Vr V ? *V Vr Vc Vc Vc Vr V" Vc Vc V c Vr J 

Char * 
gfmsg( ) 



Field *temp; 
t emp=d l_cur r( my list); 
return( temp->msg) ; 



y*^*VcycVcVcVf**Vf*Vc**ycVf**VcVf**VcVfVr*****Vc**VcVcVeVc*VcVc**Vf**VrVc***Vc*‘jV , 3VVfVf'5VVc'5V , j’cVc* , *‘3V 

FILLABLEC): 

Returns TRUE if current field is editable otherwise FALSE. 



y? Vr Vc Vc tV Vr tWr t V bV * tV tV Vc t Wc •ft Vc V? Vc * t V tV * tV tV Vc Vc Vc Vc Vc *> V *>V tV * Vc Vc Vc tV V? Vc it tV Vr t V bV Vc "jVb Wc Vr *>V bV b Wr bWcb V bV * bV bVbV bV tV bV J 

Bool 

fillableO 

{ 

Field * temp; 
t emp=d l_cur r ( my 1 is t ) ; 



if ( temp->editable) 
return(TRUE) ; 



return(FALSE); 
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j ‘V it it it it -ft Vr -jV Vc it -5 V * VoV ? V-3 V Vc it Vc ■> V - 5 V -jV it -jV -jV -j V Vc * * VoV * Vc * *•* * ■: V it Vc ■> V ->V Vr it ■sV ■sV * Vc it ■> V * ■jV Vr it ■sV Vr Vc Vc it Vc ■sV Vc -jV it 

DISPPAGEC): 

This function displays the document format on screen page by page. 
It is invoked by sending appropriate pade number. 



it it it Vc it -jV Vr Vr Vc it ■sV * V Vc Vc V? ‘V Vc ‘V VrVc ‘V it *>W? -jV VrVc it Vc Vc Ve V? it it it Vc Vr Vc it <V Vc iV •jV VcsV Vr Vc Vr Vc itit Vr Vr ■} V V? it ■} V Vt ■jV *5 V it Vc Vr Vc Vc it j 



Void 

dispPage( pagenum) 
Int pagenum; 

Int r,c,w; 
Field *temp; 



clrscrn( ); 

dl__find(mylist,PagePtr[ pagenum] , fieldcomp); 



while ((dl_curr(mylist)! =NULL) && 

(dl_curr(mylist)! =PagePtr[ pagenum+1] ) ) 

r=gfrow( ); 
c=gfcol( ); 
w=gfwidth( ); 
putcur(r,c); 
cputs(gfmsgO); 
if (fillable()) 

writea( (Char) ATTR,(Int) (w-strlen(gfmsg( ) ) ) ); 
putcur(gfrow( ) ,gfcol( )+strlen(gfmsg() ) ); 

^ putstr(gfreply()); 

dl_next(mylist); 

/* set current field pointer */ 

/* to first editable field */ 

temp=dl_find(mylist,PagePtr( PG] ,fieldcomp); 
while ( ! ( temp->editable) ) 
temp=dl_next(mylist); 



56 



/******Vf*********^VVoV**^V***^V*** , jV********VoV****^V**Vc*V«V**********Vf*Vc 

PAGE_DOWN(): Displays the next page. 

☆Vr*****************************************' jW?**********^********* j 

Void 

p3.ge_down( ) 

if ( ( PG>3) || ( PagePtr[ PG+1] =NULL) ) 



{ 



} 



ring_bell( ); 
return; 



} 



PG=PG+1; 
dispPage( PG); 



/*^VV< , ^V**Vc***V-**********^V**^V******^V*^V***Vc********Vf**Vf************* 

PAGE_D0WN(): Displays the previous page. 

Void 

page_up( ) 

if ( PG=0 ) 



{ 



} 



ring_bell( ) ; 
return; 



PG=PG-1; 

dispPage(PG); 



/***************************************************************** 
CON_TEXT(): This function converts the contents of data 
structure into text format and stores it global buffer 'TEXTBUF 1 . 
Returns the address of buffer. 



V Vc Vc V% Vc Vc Vc Vc^V Vc 1 Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc 



******** j 



Char * 
con_text( ) 

Int i ; 

Bool newline; 

Int lasted, lastrow, lc; 

Int mfw,rfw,ccol,crow; 

Field *temp; 

Char *pp; /* pointer to global buffer */ 



lastrow=0; 

lastcol=0; 



temp=dl_f irst(mylist); 
pp=TEXTBUF; 



/* start from first element */ 

/* pointer to global buffer */ 



for ( i=lastrow; i< temp->row ;++i) 

{ /* handle vertical tab */ 

*pp=(Char) CR; 

++pp; 

*pp=(Char) LF; 

-H-lastrow ; 

++pp; 
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} 

while (temp) /* process each field */ 

ccol=temp->column; 
crow=temp->row; 
mfw=str len( temp->msg) ; 
rfw=strlen( temp->reply); 

if (crow > lastrow) 

lastcol=0; 

newline=TRUE; 



for (i=lastrow ; i<crow ;++i) 

*pp=(Char) CR; 

++pp; 

*pp=(Char) LF; 

++pp; 

-H-lastrow; 



if (newline) 

for ( i=lastcol; i<ccol; ++i) 

*pp= (Char) BLANK; 

4-+pp; 

++lastcol; 

} 

newline=FALSE; 

} 

strcpy(pp,temp->msg); 
pp=pp+s trlen(temp->msg); 
lastcol=lastcol+mfw; 

if (fillable()==TRUE) 

{ 

strcpy( pp , temp->reply) ; 
pp=pp+strlen( temp->reply); 
lastcol= lastcol + rfw ; 

} 

for (i=rafw+rfw ; i<(temp->width); ++i) 

*pp= (Char) BLANK; 

++pp; 

-H-lastcol; 

} 

temp=dl_next(mylist) ; /* advance to next field */ 

*pp=(Char) CR; /* put end of document mark */ 

++pp; 

*pp=( Char) LF; 

++ p p; 

*pp= 0 ; /* treat each document as string*/ 
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} 



return( pp) ; 



j ***" VcVwt Vc V* VrVwwf'W? V» Vw! - V' V“ Vc V? V * V> V> V* ^ /** Vc V? V? V? Vc V? Vc V? V? '/f VcV? Vv Vc V* Vc Vc V? V* Vc V» V? V? Vc Vw? Vc V? V? V? VcVc V? 

DEALLOCATE( ) : This function frees memory space already allocated 
to doubly linked_list we should free memory when user is done 
or he wants to make another page in order to be able to load 
new template file and load it into linked list. 

Void 

deallocate( ) 



{ 



Field ,v temp; 
temp=dl_f irst(mylist ); 
while (!temp) 



/* first free data in the list */ 



{ 



f ree( temp->msg) ; 
free( temp->reply); 
free(temp); 
t emp=d l_next ( my 1 is t ) ; 



} 



j j^* ^ ^ y^ y^y ^y^ y^y^y^y^y^y^y^ y^y^y^y^y^ y^ yu y< y« y# y« y^ y«t y^ y# 

START_UP( ) : 

In order to start filling out the form displayed on screen, 
displays first page and sets the current field pointer to first 
fillable field in the list. Initialize PG counter. 

****************************************************************** j 

Void 

start_up( ) 

{ 



PG=0; 

dl_first(mylist); 
dispPage( ( Int) 0); 
while (fillable()=FALSE) 
dl_next(mylist); 



/* set page numbet to zero */ 

/* set the pointer to first field */ 
/* start to display first videopage*/ 
/* proceed to first editable field*/ 



**************************************************************** 



j 



MODULE 

VERSION 

AUTHOR 

DATE 



EDITOR. H 

1 . 0 

Metin AKINCI 
15 MAR, 1988 



EXPLANATION: 

Contains declarations and definitions for 
EDITOR. C module 



CHANGE LOG: 
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//include "prport. h" 
//include "keydef . h" 
//include "bioslib. h" 
//include "myascii. num" 



//include 

//include 

//include 

//include 



<ctype. h> 
<mem. h> 
<stdio. h> 
<conio. h> 



/* Program Defined Header Files */ 



/* Compiler Header Files */ 



extern 

extern 

extern 

extern 

extern 

extern 

extern 

extern 



extern 

extern 

extern 

extern 

extern 

extern 



/* Function prototypes for system. c 

Void putcur(Int,Int); 

Void readcur( Int *,Int *); 

Void writec( ); 

Void writea(); 

Void writeca(Char,Int, Int); 

Bool shift_pressed(Void); 

Int putstr(Char *); 

Void ring_bell(); 

/* Function prototypes for template. c 

Void go_next(); 

Int gfrowQ; 

Int gfcol(); 

Int gfwidth(); 

Char *gfmsg(); 

Char *gfreply(); 



*/ 



*/ 
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j VrVfVrVfVcVfVf j-j- VcV* VfVrVrVfVf 



MODULE : EDITOR. C 
VERSION: 1. 0 
AUTHOR : Met in AKINCI 
DATE : 15 MAR, 1988 
EXPLANATION: 

This module gets the user responds for 
each field on the form specified by template 
and also allows the user to edit his input. 
Prevent user from overwriting on non tillable 
fields and field message. 

CHANGE LOG: 



^include "editor, h" 



GETREPLYQ: 

Gets user response for currently edited field , returns it. 
Allows user to edit field by defined keys. Interprets the key 
combinations for our own characters. # 

***********^«^********************************VnV**************** j 

Int 

getreply( row, col, width, ms g, reply) 



Int row, col, width; 


/* 


window location and width 


*/ 


Char *msg; 


/* 


field message 


*/ 


Char *reply; 


/* 


input buffer 


*/ 


Int k; 








Int n,len; 








Int mfw; 


/* 


message field width 


*/ 


Int rfw; 


/* 


response field width 


*/ 


Int ccol; 


/* 


visible cursor column 


*/ 


Char *cp ; 


/* 


Character pointer to buffer*/ 


Char *tmp; 


/* 


temporary character pointer*/ 


Char ^buffer; 


/* 


Edit Buffer for response 


*/ 


if (msg! =NULL) 








mfw=strlen(msg); 


/* 


Get message field width 


*/ 


else 
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mfw^O; 

putcur( row, col+mfw) ; /* Place the cursor at the very 

first character location in 
the field to be filled out */ 
rfw=width-mfw; /* Calculate reply field width*/ 

buf fer=(Char *)malloc(rfw+l); 

/* Allocate memory for buffer 

of size response field width*/ 

memset(buf f er j T 0 1 ,rfw+l); /* Clear the buffer */ 

memcpy(buff er 3 reply 5 strlen( reply) ); 

/* copy reply into buffer */ 

/* in case that it was previously 
edited */ 

meraset( reply , 1 O 1 5 strlen( reply) ); 

/* clear previous string */ 

cp=buffer; /* Set walk pointer on buffer */ 

while ( ( k=get_key( ) ) ! =K„RETURN) 

/* Get key until RETURN key is hit*/ 



{ 

if (isascii(k) && ( isprint(k) ) ) 

/* If it is not control key */ 

len=strlen(cp); 

if (cp + len -buffer < rfw ) 

memcpyC cp+1 , cp , len) ; 

*cp=(Char) k; 

^ ++cp; 

else 

ring„bell(); /* buffer full */ 

else /* Else if it is control key */ 

switch (k) 

case K„LEFT : /* move left one char */ 

if (cp > buffer) 

“-cp; 

break; 

case K_RIGHT : /* move right one char */ 

if (*cp !=' 0 ! ) 

++cp; 

break; 



case K_UP : /* move prior field */ 

memcpy( reply 3 buffer 5 strlen( buf fer) ); 

/* copy buffer back */ 

free(buf f er); 
return(k); 

case K_DOWN : /* move next field */ 

memcpyC reply , buf fer ,str len( buf fer) ); 
/* copy buffer back */ 
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free(buf fer); 
return(k); 



case K_PGUP : 


memcpy( reply , buffer , s trlen( buf f er) ) ; 
/* copy buffer back */ 

free(buf fer); 
return(k); 


case K_PGDN : 


memcpy( reply , buffer , strlen( buffer) ); 

/* copy buffer back */ 

free(buffer); 
return(k); 


case K.CTRLH : 


/* destructive backspace */ 

if (cp>buffer) 

tmp=cp” 1 ; 

memcpy( tmp , cp+1 , str len( tmp) ) ; 

} — cpj 

break; 


case KJHOME : 


/* go to the beginning of buffer*/ 
cp=buf fer; 
break; 


case K_END : 


/* go to the end of buffer */ 

while (*cp != r 0 f ) 


case K_CEND 


++cp; 

break; 

: memcpy( reply, buf f er , strlen(buf fer) ); 
/* copy buffer back */ 

free(buf fer); 
return(k); 


case K_DEL 


/* delete character at cursor */ 
memcpy( cp , cp+1 , str len( cp) ) ; 
break; 


case K_ESC 


: /* cancel current input */ 

memset(buf fer , 1 0 1 ,rfw+l); 
cp=buf fer; 



break; 

/* Following keys are being used to convert to TURKISH chars */ 



case K_ALTC 


: if ( shif t_pressed( ) ) 

*cp= (Char) ascii_C; 
else 


case K_ALTG 


*cp= (Char) ascii_c; 
++cp; 
break; 

: if ( shift_pressed( ) ) 
*cp= (Char) ascii_G; 
else 

*cp= (Char) ascii_g; 
++cp; 
break; 



63 



case K ALTI 



case K ALTO 



case K_ALTS 



case K_ALTU 



if ( shift_pressed( ) ) 
*cp= (Char) ascii_I; 
else 

*cp= (Char) ascii_i; 
++cp; 
break; 

if ( shif t_pressed( ) ) 
*cp= (Char) ascii„0; 
else 

*cp= (Char) ascii_o; 
-H-cp; 
break; 

if ( shift_pressed( ) ) 
*cp= (Char) ascii_S; 
else 

*cp= (Char) ascii_s; 

++ C p; 

break; 

if ( shift_pressed( ) ) 
*cp= (Char) ascii_U; 
else 

*cp= (Char) ascii_u; 
++cp; 
break; 



default 

ring_bell(); 

break; 

/* display the reply window */ 

ccol=col+mfw; 

putcur(row,ccol); 

writec( 1 ',(Int) ( width -rafw) ); 

putstr(buffer); 

putcur( row,ccol+(cp-buffer) ); 

/* reposition the cursor */ 

memcpy( reply , buff er $ strlen( buffer) ) ; 

/* copy buffer back */ 

free(buf fer); 

return(k); /* return the key that cause 

to end function */ 
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j Vc V? Vc Vr Yc * Vr Vc * * tWn V * Vc Vc Vc*** Vc Vc Yc * Yc Yc Yc * * Yc * Yc * Yc Yc Yc Yc Yc * * * Yc Yc Yc Yc * * * Yc Yc * * * * Yc Yc Yc Yc * Yc Yc Yc * * Yc 

EDITPAGEC): 

Function that allows user to edit page form displayed on screen. 
Invokes function getreply that gets user reply for each field. 

Vc^VVcVfVcVcVrVr^VVcV-Vr'VVrVc^VVrVr^VVcVrVrVcVcVcVcVc^VVrVrVfVcVfVcVcVfVcVcVcVcVcVfVcVcVcVcVcVfVf^VVrVfVcVcVcVrVc'sV’iVVcVcVcVrVcVf* j 



Void 

editpageC ) 

Int row, col, width; 
Char *m ; 

Char *r ; 

Int flag; 

Bool done; 



done=FALSE; 

do 

{ 

row=gfrow( ); 
col=gf col( ); 
width=gfwidth( ) ; 
m=gfmsg(); 
r=gf reply ( ); 



/* get user response and store it*/ 
f lag= getreply( row, col ,width,m,r); 
switch (flag) 



case 


K_D0WN: 


/* Go next tillable field 
go_next( ); 
break; 


*/ 


case 


K_UP : 


/* Go previous tillable field 
go_prior( ); 
break; 


*/ 


case 


K_PGUP: 


/* scroll up 
page_up( ) ; 
break; 


*/ 


case 


K_PGDN: 


/* scroll down 
page_down( ); 
break; 


*/ 


case 


K_CEND : 


/* end of the editing session 
done=TRUE; 
break; 


*/ 


default : 


go_next( ); 
break; 





while ( ! done); /* do until end of page */ 

} 
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MODULE : PRINTER. C 



VERSION: 1. 0 



AUTHOR : Met in AKINCI 



DATE : 1 MAY, 1988 



EXPLANATION: 

Perforins two main functions. Prints 
content of program buffer and prints doclog. fil 
file. Allows printing Turkish characters . 

For each character, separate function 
is assigned. Input is filtered and if any 
special character is encountered, appropriate 
function is invoked and that character is 
printed. 

CHANGE LOG: 




//include <stdio. h> 



//include "prport. h" 
//include "myascii. num" 

//include "extra, fnt" 



/* file which contains ascii */ 
/* numbers for our own char */ 



/* Include file that contains extra*/ 
/* characters fonts for printer */ 



//include "epson. dat" 



/* printer commands file 



GLOBAL extern Char *TEXTBUF; /* Pointer to text buffer 



/* External function declarations*/ 



extern Void putcur( Int , Int); 

extern Void drawframe( Int , Int , Int , Int); 



char *DOCLOGFILE=" doclog. fil"; /* file name to be printed out */ 



66 



SETPRTGMODE ( ) : 

Sets printer dot graphics mode by sending appropriate ESC sequence. 

Vf**VrVfVfVfVcvVf:VVrVfV?*^VVfVf*VcVr***Vc***VrVfVcVfVfVfVf*VfVc*VfV?VcVv*^VVfVfVf*VfVfVfVfV?^VVrV?VfVfVrVfVf*VrVf* j 

Void 

setprtgmode( pptr) 

^FILE *pptr; /* Pointer to printer stream */ 



int i; 

for ( i=0; i<4; -H-i) /* Send ESC sequence to set */ 

fputc(p_grmode[ i] ,pptr); /* printer to dot graphics mode */ 



j **************************************************************** 

PRINT_C(): 



Prints the new lowercase f c r letter by sending dot patterns to 
the printer. 



Void 

print_c(pptr) 

FILE *pptr; 

int i; 

setprtgmode( pptr ) ; 

for ( i=0; i<8; ++i) 
fputc( c_pattern[ i] ,pptr); 



/* Send ESC sequence to set */ 
/* printer to dot graphics mode */ 

/* Copy new c pattern to printer*/ 



Jkixkrkkkkkkrk-k'k'k'k'kirkkkkrk’kkrkrkkrk'krkrkrkrkkrkkkkkrkrkrkkrkkkrkkrkrkk'kickkrk’krkkkix'krkrkk 

PRINT _CC(): 



Prints the new uppercase T C r letter by sending dot patterns to 
the printer. 



Void 

print_CC(pptr) 
FILE *pptr; 

int i; 



setprtgmode(pptr); /* Send ESC sequence to set */ 

/* printer to dot graphics mode */ 

for ( i=0; i<8; ++i) 

fputc(CC_pattern[ i] ,pptr); /* Copy new C pattern to printer */ 
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^ ***************************************************************** 
PRINT_I( ) 

Prints the new lowercase * i ’ letter by sending dot patterns to 
the printer. 

****************************************************************** j 



Void 

print_i(pptr) 
FILE *pptr; 

int i; 



setprtgmode(pptr); /* Send ESC sequence to set */ 

/* printer to dot graphics mode */ 

for ( i=0; i<8; ++i) 

fputc( i_pattern[ i] ,pptr); /* Copy new c pattern to printer */ 



} 

/***************************************************************** 

PRINT.CIO: 

Prints the new uppercase *1* letter by sending dot patterns to 
the printer. 

***** ************************************************************* j 



Void 

print„CI(pptr) 
FILE *pptr; 



int i; 

setprtgmode(pptr); /* Send ESC sequence to set */ 

/* printerto dot graphics mode */ 

for ( i=0; i<8; -H-i) 

fputc(CI_pattern[ i] ,pptr); /* Copy new c pattern to printer */ 



} 



j ***************************************************************** 

PRINT_G( ) : 

Prints the new lowercase ’ g ’ letter by sending dot patterns to 
the printer. 

****************************************************************** J 



Void 

print_g(pptr) 
FILE *pptr; 



{ 

int i; 



setprtgmode(pptr ); 

for ( i=0; i<8; -H-i) 
fputc(g_pattern[ i] ,pptr); 



/* Send ES.C sequence to set */ 

/* printer to dot graphics mode */ 

/* Copy new g pattern to printer */ 
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PRINT_CG(): 

Prints the new uppercase ' G 1 
the printer. 

*V Vr v V * V Vc Vr -V -V *>V * Vr VrsV ■; c Vc ** * VnV WoVVc VoV Vr ■jV 

Void 

print_CG(pptr) 

FILE *pptr; 



letter by sending dot patterns to 






-’c'V'V'Wc 



;V V c Vc “V Vc -V Vr Vc V? * “V Vc ■} V -5 V Vr Vc *.V V? Vc Vc Vr -> ■ 



•*/ 



{ 

int i; 

setprtgmode(pptr) ; 

for ( i=0; i<8; ++i) 
fputc(CG_pattern[ i] ,pptr); 



/* Send ESC sequence to set */ 

/* printer to dot graphics mode */ 

/* Copy new C pattern to printer */ 



PRINT_0( ): 

Prints the new lowercase 'o' letter by sending dot patterns to 
the printer. 

Vr*Vr*Vr^VVc***^V^VV?**********^V*************Vc**Vc*****Vc***ycVc* , )V , )V , )'c , ) t : , )V**Vc , )V , )VVc')V* j 

Void 

print_o(pptr) 

FILE *pptr; 



{ 



int i; 

setprtgmode(pptr); /* Send ESC sequence to set */ 

/* printer to dot graphics mode */ 

for ( i=0; i<8; ++i) 

fputc(o_pattern[ i] ,pptr); /* Copy new o pattern to printer */ 

y'*Vr*Vf*****Vf**^V****Vc*********** , )V* , )V , )V*** , )VVf*’>V**** , )V , )V*SV , 5V , )V , )V* , )VVf* , )VVcVc* , )V**Vc** , >V 

PRINT_C0( ) : 

Prints the new capital 1 0 1 letter by sending dot patterns to 
the printer. 

*VcVc*****^V**V****VfVc*Vr******Vf***************^r**yc* ,, }VVc , ** , 5V^r* , 3Vyc’* , )V , )V*** , )V'>V**Vc* j 



Void 

print_CO(pptr) 
FILE *pptr; 



{ 

int i; 



setprtgmode(pptr); 

for ( i=0; i<8; ++i) 
fputc(CO_pattern[ i] ,pptr); 



/* Send ESC sequence to set */ 

/* printer to dot graphics mode */ 

/* Copy new 0 pattern to printer */ 
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PRINT_U( ): 

Prints the new lowercase T u ! letter by sending dot patterns to 
The printer. 

VcVrVcVc*Vr****V-**VcVr^VVc*^V^V^V*Vc***Vc*V? , *VrVc*^VVcVc*VfVfVcVc*^VVvVc^VVc^VVc*Vf^VVcVcVr^V*Vc^V^VVcV-V« ,, 5V'5V , )V , )V j 

Void 

print_u(pptr) 

FILE *pptr; 

int i; 

setprtgmode(pptr); /* Send ESC sequence to set */ 

/* printer to dot graphics mode */ 

for ( i=0; i<8; *H-i) 

fputc(u_pattern[ i] ,pptr); /* Copy new u pattern to printer */ 



jisitis^isis'k'k'k-k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'it'k'kis'jt'k'k'k'k'k'k'k'k'k'k'k'k'k 

PRINTJ3U(): 

Prints the new uppercase T U f letter by sending dot patterns to 
the printer 

■jV^Wr VnWc * 'k'k'k~k'k'k 'l<'k'k a k'ki< 



"k'k'k'k'k'k'k'k'k'k'k'kit'k'k'k'k'k’it'k'k’k'k'k'k'k’k'k'k'k'k'k'k'lt'k'k'k'k’kis'iz'k'k'k'k'k'k'k J 



Void 

print_CU(pptr) 

FILE *pptr; 

int i; 

setprtgmode(pptr); /* Send ESC sequence to set */ 

/* printer to dot graphics mode */ 

for ( i=0; i<8; -H-i) 

fputc(CU_pattern[ i] ,pptr);/* Copy new U pattern to printer */ 



PRINT_S( ): 



Prints the new lowercase T s f letter by sending dot patterns to 
the printer. 



Void 

print_s(pptr) 
FILE *pptr; 



int i; 

setprtgmode(pptr); /* Send ESC sequence to set */ 

/* printer to dot graphics mode */ 

for ( i=0; i<8; ++i) 

fputc( s„pattern[ i] ,pptr); /* Copy new s pattern to printer */ 
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PRINT.CS () : 

Prints the new uppercase ’ S T letter by sending dot patterns 
to printer. 

Vc V? Vr V? Vr ?V t? V? tV Vr V? Vc ‘s'? Vr tV V? Vr Vr ■sV Vc Vc V? Vr V ? Vc V> Vc tWt Vr-V V* Vc Vc V? Vc V? Vc Vr V? Vc * V? Vr Ve Vc Vc V? V? ‘s'? Vr Vc "sV Vc Vr; Wc V? * Vr V? Vc V r Vr j 



Void 

print_CS(pptr) 
FILE *pptr; 



{ 

int i; 

setprtgmode(pptr); /* Send ESC sequence to set */ 

for ( i=0; i<8; ++i) /* printer to dot graphics mode */ 

fputc(CS_pattern[ i] ,pptr); /* Copy new C pattern to printer */ 



SETPRTQ: Resets the printer. Cancels all possible modes . 
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Void 

setprt(pptr) 
FILE *pptr; 

int i; 



f puts ( p_cbo Id , pptr ) ; 


/* Cancel bold mode 


*/ 


fputs(p_cds ,pptr); 


/* Cancel double strike mode 


*/ 


fputs(p_cital,pptr); 


/* Cancel italic mode 


*/ 


f puts ( p_ccmp , pptr ) ; 


/* Cancel compressed mode 


*/ 


for ( i=0; i<3; ++i) 






fputc(p_cul[ i] ,pptr); 


/* Cancel underline mode 


*/ 



fputs(p_init ,pptr); /* Printer hardware initialize */ 
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/***************************************************Vc*************** 

PRINT_PAGE() : 

Gets the contents of TEXTBUF global buffer and by searching 
and printing extra characters sends them to printer. 



■jWcVrjWfV? * -jV-j'rjW: *■ 



'•jV’sVVfVv’^Vc'jVVc'jV'jVVcyVVc'jV'jV^WoWcVr'sWr’jWrVf 



■jWcVc’^Vc’yrsWfVcjWc’VffVnWrVcVrsWc’Vf'sV'jWoWf^'sV’jV^Wc 



/ 



Void 

print_page( ) 

FILE Sprinter; 
Char ch; 

Char *bufptr; 
Int i, count; 



count=getnumber( ) ; 

printer 3 fopen( "PRN" ,"w"); 
if ^ (printer=NULL) 

clrscrn( ); 

drawframe( ( Int) 19 , ( Int) 15 , ( Int) 23, (Int) 65); 
putcur((Int) 21, (Int) 17); 

printf(" n%s", "PLEASE MAKE SURE PRINTER IS ON"); 
printf( "%s n" , . AND HIT ANY KEY"); 
getche( ); 
return; 

clrscrn( ); 
setprt(printer) ; 
for ( i=0; i<count; ++i) 

bufptr=TEXTBUF; 

while ( ( ch=*bufptr)! =' O') 

switch (ch) 



case 


ascii_c: 


print_c( printer ) ; 
break; 


case 


ascii_C: 


print_CC( printer); 
break; 


case 


ascii_i: 


print_i( printer); 
break; 


case 


ascii_I: 


printed (printer); 
break; 


case 


ascii_o: 


pr int_o( printer) ; 
break; 


case 


ascii_0: 


pr int_C0( printer ) ; 
break; 


case 


ascii_s: 


pr int_s ( pr inter ) ; 
break; 


case 


ascii_S: 


print_CS( printer); 
break; 


case 


ascii_u: 


pr int_u( printer) ; 
break; 


case 


ascii_U: 


print_CU( printer); 
break; 


case 


ascii_g: 


print_g( printer) ; 
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break; 

case ascii_G: print_CG(printer); 
break; 

default : fputc( ch, printer); 



} 

putchar( ch); 

-H-bufptr; 

fputc(FF ,printer); /* Put form feed character 

/* for next copy 



PRINT_FILE( ): Prints program defined doclog. fil file. 



Vc *5 V Vf *3 V Vc *3 V * Vc Vc " 3 V Vc Vc ?V Vc Vc * V? Vc “V V V Vc Vr V? Vr Vc Vc V? Vc Vc Vr ■ 



•^WoWriV'sWc'sWc’jV’jWf^V^Wc^WcVf’sV’sWc^Vc^V’sV^V'sV'sV^Wc’sWrsWc'sV J 



Void 

print_f ile( ) 



FILE *printer,*fptr; 
Char ch; 

Char *bufptr; 

Int i, count; 



fptr=fopen(DOCLOGF!LE,"r"); 
if ( ! fptr) 

error((Int) 1); 
return; 

printer 35 fopen( "PRN" , "w"); 
if ( p r int e r=NULL ) 

clrscrn( ); 

drawframe( ( Int) 19 , ( Int) 15 , ( Int) 23, (Int) 65); 
putcur((Int) 21, (Int) 17); 

printf ( " nXs" , "PLEASE MAKE SURE PRINTER IS ON"); 

print f("%s n" , ". . . AND HIT ANY KEY"); 

getcheQ; 

return; 

clrscrn( ); 
setprt( printer); 
while ( ! feof( fptr) ) 

{ 

ch=fgetc( fptr) ; 
switch (ch) 



case 


ascii„c: 


print_c( print er); 
break; 


case 


ascii_C: 


print_CC( printer); 
break; 


case 


ascii„i: 


print_i(printer); 

break; 


case 


ascii_I: 


pr int_C I ( pr inter) ; 
break; 


case 


ascii_p: 


print_o( printer); 
break; 


case 


ascii_0: 


print_CO(printer) ; 
break; 


case 


ascii_s: 


print_s( printer); 
break; 


case 


ascii_S: 


print_CS( printer); 
break; 


case 


ascii_u: 


print_u( printer); 
break; 


case 


ascii_U: 


print_CU( printer) ; 
break; 


case 


ascii_g: 


print_g( printer) ; 
break; 
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case ascii_G 
default 



print_CG( printer); 
break; 

fputc( ch, printer) ; 
break; 
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/**************************************************************** 



MODULE : DBASE. C 
VERSION: 1. 0 
AUTHOR : Met in AKINCI 
DATE : 15 MAY, 1988 
EXPLANATION: 

Implements index sequential access to 
database file which holds documents, 
cooperates with LLADT. C module. 

CHANGE LOG: 



****************************************************************** J 



//include "prport. h" 

//include <stdio. h> 
//include <string. h> 
//include <mem. h> 



GLOBAL extern Char *TEXTBUF; /* pointer to global buffer */ 

/* definitions on the key to database */ 

extern Char *KEYWORD; /* pointer to keyword buffer */ 

//define KEYSIZE 12 /* define size of keyword */ 

//define BUFSIZE 3500; 



/* function prototypes for userinterf ace module */ 

extern Void getdocinfo( Char *); 
extern Char *getkey2db( ); 



/* File name definitions related to Dbase. C module */ 

Char *INDEXFILE = "index. fil"; /* index file , contains kwords */ 
Char *DBASEFILE = "dbase. fil"; /* database file */ 

Char *D0C_L0G = "doclog. fil"; /* file to keep record of */ 

/* incoming document */ 
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/* definition of data structure for index sequential access */ 
/* implementation */ 



typedef struct INDEX 

l 

Char *key2db; 

} INDEX ; 

typedef char INDXLST; /* generic pointer to Hist */ 

INDXLST *indexlist; 

^define POSITIVE 1 

/****■**** Function prototypes for linked list module *********/ 
extern char *ll_alloc(); 

extern INDEX *ll_find( INDXLST * , INDEX *,int (pfcomp)O); 

extern Bool 11 delete( INDXLST *, INDEX *); 

extern INDEX *11 next( INDXLST *); 

extern INDEX *ll_first( INDXLST *); 

extern INDEX *ll_last( INDXLST *); 

extern Bool 1 1_ add ( INDXLST *, INDEX *,int (*pfcomp) ( ) ); 






/** 

MYSTRCMP(): Compares two string in 1 Inode. 
Function like strcmpQ. 



Int 

mystrcmp(nodel ,node2) 
INDEX *nodel ,*node2; 

Int i; 



i=0; 

while ((nodel->key2db)[ i] =(node2->key2db)[ i] ) 
if (nodel->key2db[ i++] =' O') 
return( 0) ; 

return((nodei->key2db)[ i] - (node2->key2db)[ i] ); 
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y **************************************************************** 
INDEXCMPC): 

compares two node of linked list. In order to put new item 
at the end of the list, it always return positive. 

**************************************************************** j 



Int 

indexcmp(s ,t) 

INDEX * s,*t; 

return( POSITIVE); 



/*************************************************************** 
LOADINDEX(): Loads keywords from index file into linked list. 

**************************************************************** j 



Void 

loadindex( ) 

{ 

FILE *fptr; 

Bool flag; 

Char line[ 80] ; 
INDEX *indexptr; 



indexlist=ll_alloc( ); 
fptr=fopen( INDEXFILE , "r" ) ; 

if (fptr=NULL) /* if file is not existing, */ 

return; /* assume there is no document */ 

/* in database. */ 



} 



while (fgetline(fptr, line, (Int) KEYSIZE) ) 



indexptr=( INDEX *)malloc( sizeof ( INDEX) ) ; 
indexptr ->key2db=( Char *) malloc(KEYSIZE+l); 
memset( indexptr->key2db , ' O' ,KEYSIZE+1); 
strcpy( indexptr->key2db, line); 
ll_add( indexlist , indexptr , indexcmp); 

fclose( fptr); 



/*************************-**************************************** 
UPDATE I NDEXF( ): Writes all keywords back tto index file in the same 
order in the linked list. 



****************************************************************** j 

Void 

updateindexf ( ) 

FILE *fptr; 

Int i; 

INDEX *temp; 



fptr=fopen( INDEXFILE/ w+ n ); /* open index file */ 

/* if file does not exist create*/ 

temp=ll_f irst( indexlist); 

while (temp) /* write everything in indexlist*/ 

( /* back to index file . */ 

fprintf ( fptr , "%s n ,f , temp->key2db); 
temp=ll_next( indexlist); 



78 



} 

fclose( fptr) ; 

temp=ll_f irst( indexlist); /* first free the data in LLIST */ 
while (temp) 

free( temp); 

temp=ll_next( indexlist) ; 

ll_free( indexlist ); /* then free the linked list */ 
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/***************************************************************** 
GETINDEX(): Gets the index value for a certain keyword. 

The relative location in the list implies index for that keyword. 

****************************************************************** j 

Int 

getindex( ) 



Int i; 

INDEX *temp ,*countptr; 

temp=( INDEX *) malloc( sizeof ( INDEX)); 
temp“>key2db=(Char *) malloc(KEYSIZE); 
meroset(temp->key2db, ' O' ,KEYSIZE); 
strcpy( temp->key2db , KEYWORD) ; 
countptr=ll_first( indexlist); 
i=l; 

while (countptr) 

if (! (strcmp(countptr->key2db,terop->key2db) ) ) 
return( i); 

countptr=ll_next( indexlist); 



} 



i=i+l; 



} 



return( 0); 



^ ***************************************************************** 
SAVE_KEY( ): 

Saves the key to database and assigns an implicit index 
value to it. 

****************************************************************** j 



Bool 

save_key( ) 

INDEX *new; 

new=( INDEX*) malloc(sizeof( INDEX) ); 
new->key2db=( Char *)malloc(KEYSIZE) ; 
strcpy(new->key2db,KEYW0RD); 
ll_add( indexlist , new, indexcmp); 
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DISLPAYBUFFER( ) : Displays the program buffer. 

It is invoked after document has been fetch in buffer. 



Provides -- more -- 

Vc Vc iV 'V -jV * Vc Vc * n'c Vr Vr V? Vc V? Vc Vc * Vr ■ 



facility. 

VnV**** , 3WrjV* , 3V***Vc******yf** , 5V*****Vc , *Vc******Vc***** , A’ j 



Void 

displaybuf f er( ) 



Char *temp; 


/* 


temp pointer to buffer 


*/ 


Int linecount, 


/* 


variables to control scroll 


*/ 


pc; 








Char ch; 








t emp=TEXTB UF ; 


/* 


temp pointer to buffer 


*/ 




/* 


intialize variables 


*/ 


linecount=l; 


/* 


number of lines displayed 


*/ 


pc^l; 


/* 


number of video pages 


*/ 


clrscrn( ) ; 
t emp=TEXTBUF ; 


/* 


set pointer to the beginning 


*/ 




/* 


of buffer 


*/ 


while ( (ch=*temp)! = T 0 T ) 
putchar(ch); 




display document requested 


*/ 


/* 


control scrolling 


*/ 



-H-temp; 
if (ch =1 n 1 ) 

linecount=linecount+l; 
if (linecount %(pc*23)=0) 



pc=pc+l; 

f pr int f ( s tdout , " n%s"," more hit any key ... n"); 

getcheQ; 

fprintf(stdout n%s"," — ■ hit any key to continue n"); 

getcheQ; 
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BROWSE(): It is used to browse any document from database file. 

It requests the keyword, gets index then fetches document into 
buffer. Calls display buffer routine. 

Returns FALSE in case of failure. 



Vr Vr VrVc Vr Vc Vc VcVr Vr Vc Vc * Vr Vr Vc Vc Vc Vc Vr ** VoWc ** ** VcVr 



Bool 

browse( ) 

Int recnum; 
Int size; 

Int j; 

Char *temp; 
FILE *fptr; 
Int i; 

Int recsize; 



• Vc Vc Vc -.V Ve Vr Vr Vc Vc * Vr Vc VcVc Vc Vr Vc ■jV'jV V? VciV Vc tWc Vc sV Vc 'iWcVe * ** j 



} 



fptr=f open( DBASEFILE , "rb" ) ; 
if (fptr=NULL) 

error((Int) 1); 

^ returnC FALSE); 

recnum=getindex( ) ; 
if ( ! recnum) 

{ 



/* Get the index 
/* if not found 
/* return after 



error messages 



error((Int) 3); 
return( FALSE); 

temp=TEXTBUF; /* temp pointer to buffer 

for ( i=l; i<recnum; ++i) /* get the offset to document 

fscanf ( fptr , "%d ,! ,&recsize); 
fseek( fptr ,( Long) recsize, 1); 

fscanf( fptr,"%d" ,&size); /* get the size of document 
for ( j-1; j<size; -H-j) /* copy document into buffer 



*temp-fgetc( fptr); 
4-ftemp; 

*temp=' O'; 
displaybuf f er( ); 

rewind( fptr); 
fclose( fptr); 
return(TRUE); 



/* attach string terminator 
/* display the buffer 
/* by controlling scrolling 



*/ 

*/ 

*/ 



*/ 

*/ 



*/ 

*/ 



*/ 

*/ 

*/ 
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/Vc*'jV***'5V*****************Vc 1 ****7Hr*Vc-*'jWr***-3V***********'3V** < )Wf******Vc** 

SAVEDOCQ: Saves the document currently edited into DBASEFILE. 

**VcVrVrVrVfVcVc?Vyp*Vf^VVfVc^VVfVfVfVcVcycVcVcVfVcV>*VcVc*^VVc*VVfVfVf^Vyf*VfVcVf*VcVfVcVcVc*VcVfVcVfVcVcVcVrVf*Vf*Vcyf* j 

Void 

savedoc( ) 

{ 



FILE *fptr; 

Char ch,*buffer; 



buf fer=TEXTBUF; 


/* set pointer to buffer 




*/ 


getkey2db( ); 


/* get key to dbase from user 


*/ 


save_key( ); 


/* save key in the linked 


list 


*/ 


fptr=fopen( DBASEFILE 


tt -t . tr N 

» ab+ ); 






/* append the document 
/* first write its size 




*/ 

*/ 


fprintf ( fptr , "%d n" , 


strlen(TEXTBUF) ); 

=' O') /* then write buffer into 




while ((ch=*buffer)! ; 
fputc( ch, fptr); 


file 


*/ 





^ -H-buffer; 
fclose( fptr); 



j -5 V Ve ic it VcVc Ve Vc -3 V Vc -j V Ve it ic -jV it *jV ic -j Wc VcjV *5 V * Ve * 'k V? V? tV Vc -k Vt V? Vr * Vc Vt V<r * Vc tV * Vc Ye ■jV *3 V -jWc * Ye Ye Yc •jV Ye Ye Ye Ye Ye Ye Ye V? Ye Ye Ye Ye 

ENTERLOGQ: Allows the user to enter the information about any 
incoming document. Information about document is 
provided by the function getdocinfoQ that is defined 
within userinterf ace module. 

YeYeYeYeYeYeYeYeYeYeVeYeYeYeYrYryeYeVeYeyeYeYrVcYeYeYeYeYryeVrVeVeYeYeVeVeYeVeYeyeYeYeYeYeYeYeYeYeYrYeYeYeYeYeYeYeYeYrYeYeYeYeVcYryeYe j 



Void 

enterlog( ) 

{ 

FILE *fptr; 
Char line[ 80] ; 



f ptr=f open( DOC.LOG , " a+" ) ; 



getdocinfo( line); 
fprintf ( fptr , "%s n" ,line); 
fclose( fptr); 
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y***^V*^V^V^VVc******'5V***’5V , 5V**Vc’ , jV**V nV**}V*Vc*^V**?V****}V*}V**********}Wc* , iV'5V , 5V 



MODULE : USERINT- C 
VERSION: 1. 0 
AUTHOR : Metin AKINCI 
DATE : 1 MAY, 1988 
EXPLANATION: 

Implements user interface part of the project. 
Gets all input values from user returns 
to calling module. 

CHANGE LOG: 






//include "prport. h" 
//include "bios lib. h" 



//include <stdio. h> 
//include <alloc. h> 



/* DEFINE BOX CHARACTERS */ 

//define VBAR2 186 
//define HBAR2 205 
//define ULC22 201 
//define URC22 187 
//define LLC22 200 
//define LRC22 188 



/* Function prototypes */ 

extern Void clrscrn(); 
extern putcur( Int, Int); 
extern fgetline(FILE *, Char *,int); 
extern putsbuf(Char *,Char *); 
extern putcbuf(Char *,Char ); 



GLOBAL extern Char * KEYWORD; 
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/ ,v Define pointers to messages to be displayed in module */ 



static char MAINHEADER[ ] = 

" ««« MAIN MENU »»»" ; 
static char *MA INMENU [ ] = { 

1. PREPARING DOCUMENT ..." , 

"2. BROWSING A DOCUMENT 
"3. ENTERING AN INCOMING DOCUMENT..", 
"4. PRINTING INCOMING DOCUMENT LOG. . " , 
"5. EXIT TO DOS. . " 

} ; 

static Char ASKENTER[ ] =' ! Please enter your choice=>"; 

static Char ASKSAVEM = 

h WILL THIS DOCUMENT BE SAVED? (Y/N).."; 



static Char ASK_KEY[] = 

" PLEASE ENTER THE DOCUMENT ID IN CORRECT FORMAT. . " 



static Char HOWMANY[ ] = 

"HOW MANY COPY DO YOU WANT ? => 

static Char HOWMANY_HELP[ ] = 

"ZERO IMPLIES NO OUTPUT. MAXIMUM 8 COPIES. . 



//define 

//define 

//define 

//define 

//define 

//define 

//define 



MENULX 


5 


/* 


MENULY 


15 




MENURX 


21 


/* 


MENURY 


65 




MSGX 


23 


/* 


MS GY 


5 




KEYSIZE 12 





Main menu left corner coordinates */ 
Main menu right corner coordinate */ 
Prompt area coordinates */ 
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^ *************************************************************** 
PUTHEADER(): Displays any header to specified location. 

**************************************************************** j 



Void 

putheader(x,y, strptr) 

Int x,y; 

Char *strptr; 

putcur( ( Int)x, ( Int)y); 
puts(strptr); 



/************** ************************************************** 
DRAWFRAMEQ: Draws frame for the given coordinates. 

***************************************************************** j 



Void 

drawframe( leftupX, leftupY, rightdownX, rightdownY) 
Int leftupX, leftupY; 

Int rightdownX, rightdownY; 

Int i; 

putcur( ( Int) leftupX, ( Int) leftupY); 
putchar(ULC22) ; 

for (i=0;i< rightdownY- leftupY- 1; ++i) 
putchar(HBAR2); 
putchar(URC22); 

for ( i=leftupX+l; i<rightdownX; ++i) 

putcur( ( Int) i , ( Int) leftupY) ; 
putchar( VBAR2); 

putcur(( Int)i, ( Int) rightdownY); 
putchar( VBAR2); 

putcur( ( Int) rightdownX, ( Int) leftupY); 
putchar( LLC22 ) ; 

for (i=0; i<rightdownY-leftupY-l; ++i) 
putchar ( HBAR2) ; 
putchar ( LRC22 ) ; 



j *************************************************************** 

IFSAVEQ: 

Function that prompts the user if he wants to save the document. 

**************************************************************** i 



Bool 

ifsave( ) 

Char choice; 



clrscrn( ); 

putheader ( ( Int ) MSGX , ( Int) MSGY , ASKSAVE) ; 
do 
{ 

putcur((Int) MSGX, (Int) ( strlen( ASKSAVE) +MSGY+2)); 
scanf("%c" ,Scchoice); 

while (choice!='y' && choice! =, Y' && choice!='n l 6e& choice! =' N 1 ); 
if (choice='y' || choice='Y') 
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return(TRUE); 

return(FALSE); 



} 

j ************** *************Vr***** ******************** *********** 

GETKEY2DB(): 

Gets the key to database. Prompts the user to enter the keyword 
then gets it and stores in the global variable KEYWORD. 

Vc V% Vc Vc VcVr #WcV? V-?Vc V* VcV% Vc^r?Vr Vr Vr Vc Vc Vc Vc Vc Vc Vi >, 5Wc Vc VcWVc Vc Vc Vc Vc V? ^Wc Vc Vc VcVcVc Vc 'jWc^Wc Vc Vc V(Vc «Wf Vc Vw « ^Wc Vc Vc Vc j 

Char * 



^etkey2db( ) 

clrscrnO; /* Prompt the user to enter the */ 

/* keyword. */ 

putcur( ( Int) MSGX, ( Int)MSGY); 
print f( "%s" ,ASK_KEY); 
putcur(Clnt) (MSGX+1) , ( Int) 15); 
writea( (Char) ATTR,( Int) KEYSIZE); 

/* color the input area */ 

getreply( ( Int) (MSGX+1) ,( Int ) 15, (Int) KEYSIZE, NULL, KEYWORD); 

/* get the keyword from the user*/ 
strupr( KEYWORD); /* convert it to uppercase */ 

return( KEYWORD); 



y **************************************************************** 
GETDOCINFO(): Gets the incoming document information from user 
allows user to edit his input. 

***************************************************************** j 

Void 

getdocinfo( where) 

Char *where; 

Char line[801; 
memset(line, O' ,80); 
clrscrn( ) ; 

drawframe((Int)16,(Int)15,(Int) 22, (Int) 75); 
putcur((Int) 17, (Int) 18); 

print f( "PLEASE ENTER THE INFORMATION ABOUT INCOMING DOCUMENT"); 
putcur((Int) 19, (Int) 18); 

printf ("DOCUMENT ID FROM DATE "); 

putcur((Int) 21, (Int) 17); 
writea( ( Char) All'R , ( Int ) 58); 

getreply( ( Int) 21 , ( Int) 17, (Int) 58, NULL, line); 
strcpy( where, line); 
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MMENU(): Function that displays main menu. 

*Vf*^Vf^V“V^VVcVfVc**V-Vf*******Vc*“V**Vc*“VVc***Vc***^VVc“VVf**^^V*VfVf***^V**^**VcVf*Vf , >V* , }V , jV j 



Void 
mmenu( ) 

Int x,y,n,i; 
clrscrn( ); 



putheader( ( Int ) 3 , ( Int) 25 ,MAINHEADER) ; 

drawf rame( ( Int) MENULX, ( Int) MENULY, ( Int) MENURX,(Int) MENURY); 

n= sizeof(MAINMENU)/sizeof(Char *); 

put cur ( ( Int ) ( MENULX+2 ) , ( Int ) ( MENULY+2 ) ) ; 



} 



for 

{ 



( 1=0; i<n; ++i) 

printf( "%s n" ,MAINMENU[ i] ); 



} 



r eadcur ( &x , & y) ; 

put cur C ( Int ) ( x+2 ) , ( Int ) ( MENULY+2 ) ) ; 



GETREQUEST( ): Gets the number of the request. 



Int 

getrequest( ) 

Char choice; 
mmenu( ); 

putheader( ( Int)MSGX, ( Int)MSGY, ASKENTER); 
put cur ( ( Int) MSGX j ( Int)MSGY); 
printf("%s", ASKENTER); 



do 

{ 

put cur ( ( Int) MSGX, ( Int)(strlen(ASKENTER)+2+MSGY) ); 
scanf( ”%c" ,&choice); 

while (choice<'l' || choice>'5’); 

return( choice-' O' ); 
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GETNUMBER(): 

Gets the count of the copies from user. 0 implies nothing 
will be printed. 

•sV’sV's'c'sWc Vr ■jVV? Vr * VnV*“VVoV* VoV** -jWoV-jWc VoV-.V *?Wc Vr Vr ?Wc VoWc* VoV-jVtW? ■j'c'^c^Wc * -jWoWc ^V'sWc VoWc tWcVcVc* j 

Int 

getnumber( ) 

Char num; 



clrscrn( ); 

drawframe((Int)19,(Int)15,(Int) 23, (Int) 65); 

putcur(CInt) 21, (Int) 20); 

printf("%s n",H0WMANY); 

putcur(CInt) 22, (Int) 20); 

printf ( "%s n" , HOWMANY_HELP ) ; 

do 

{ 

put cur ( ( Int) 21, (Int) ( 20+strlen(HOWMANY) ) ); 
scanf("%c" ,&num); 

while (num<’o' || num> '8'); 
return(num-' O' ); 



GETTEMPLATE( ): Gets the number of the template from user. 

*Vc itit^is^^Wt^'k'k'k-k-k'k'k'k'k'k'k'k'k'k'k-k'k'k'k-k-k'is'k-k'k-k'k'k'k'k'k'k'k'k'k-k'k'k'k'k-k'k'k'k'k’k'k-k'k-k-k-k'k-k j 

Int 

gettemplate( ) 

Int num; 
clrscrn( ); 

printf ( ”%s n ,, , ,f ALL TEMPLATES AVAILABLE HAS BEEN LISTED BELOW”); 
printf(” Find the number for template that you need..”); 
showtemp lates( ); 
clrscrn( ); 

drawframe( ( Int)21 , ( Int) 10 , ( Int ) 23 , ( Int) 69); 
putcur((Int) 22, (Int) 12); 

print f(”ENTER THE NUMBER OF TEMPLATE YOU WANT TO EDIT . .”); 
writea( (Char)ATTR, ( Int) 3); 
scanf (”%d” ,&num); 
return(num); 
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ERRORQ: 

Simple error handler function. Prompts user according to error^code 
which is determined by related modules. 

:V*V?VoV*VcV» Vc*VfVf**VfVcVr*Vr**VfVcVcVc , VfVcVfVf^VVcVc^V*Vc*Vc*Vf*Vf*VfVf***Vf*^VVcVcVf^VVc*Vf*VfVr*Vf*VfVc j 

Void 

error( error_code) 

Int error_code; 

char ch; 

clrscrn( ); 
ring_bell( ); 

drawframe( ( Int) 8,(Int) 20, (Int) 10, (Int) 60); 
putcur((Int) 9, (Int) 22); 
printf("%s","m "); 

switch (error_code) 

case 1 : printf("%s"," Can not open file.."); 
break; 

case 2 : printf("%s" ," Error while loading template.. "); 
break; 

case 3 : printf ( "%s" ," Error ! Possibly incorrect keyword"); 
break; 

case 4: printf ( "%s" ," Template too long "); 
default: break; 
putcur((Int) 24, (Int) 10); 

printf("%s", "PLEASE HIT ANY KEY TO CONTINUE.."); 
getche( ); 
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/ ********** Vf ********************** ***'A , ***iV****iV*'A"**Vc**'A'*VciV*'5WfVf ********** 



MODULE : SYSTEM. H 
VERSION: 1. 0 
AUTHOR : Met in AKINCI 
DATE : 25 FEB, 1988 

EXPLANATION: Header file for system, c module 
It contains all definitions and 
data structure used within system. c module 

CHANGE LOG: 






//include 

//include 

//include 

//include 

//include 

//include 



"prport. h" 


/* 


INCLUDE FILE FOR PROJECT GLOBALS */ 


"keydef. h" 


/* 


KEYBOARD SCAN CODES 


*/ 


"bios lib. h" 


/* 


BIOS FUNCTIONS 


*/ 


<dos. h> 
<bios. h> 
<stdio. h> 


/* 


Include neccesary TC header 


files*/ 



/* DEFINITIONS OF DATA STRUCTURE FOR REGISTERS */ 

struct W0RD_REGS 

{ 

WORD ax,bx,cx,dx,si,di,cflag; 

} ; 



struct BYTE_REGS 

{ 

BYTE al,ah,bl,bh,cl,ch,dl,dh; 

} ; 



union REGISTER 

{ 

struct WORD_REGS x ; 
struct BYTE_REGS h ; 

} REGS; 
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MODULE : SYSTEM. C 
VERSION: 1. 0 
AUTHOR : Met in AKINCI 
DATE : 14 JAN, 1988 



EXPLANATION: 

This module contains system dependent 
functions definitions. All functions within 
this module are system dependent. To port the 
program to the another system, this entire module 
must be changed with the one which contains 
appropriate system calls. 

CHANGE LOG: 

Throughout this project IBM PC default video 
page number (which is zero) has been used. 

All functions in this modules work will under 
this assumption. 

To make them general purpose, page number 
must be added to function parameters. 



^include "system, h" 



PUTCURQ: 



Gets the row and column number of new cursor location and sets 
the cursor to given coordinate. 

V? Vc Vc -5 V * -k -3 V -5 V Vc -k -k Vc Vc -5 V * * * Vt Vc Vc tV Vc Vc -j V * Vc Vc 'kic'k'ki^'ic'k'k'k^^'k'k'k'-k'k'k'k'k'ki^'k Vc * Vr Vc VoV Vo V * V Vc Vc *3 V * Vo Wc J 



Void 

putcur(r,c) 

Int r,c; 

union REGS inrg,outrg ; 

inrg. h. ah=CUR_POS; 
inrg. h. dl=c; 
inrg. h, dh=r; 
inrg. h. bh=0; 

int86 ( VIDEO , &inrg , &outrg) ; 



/* 


cursor addressing func no 


*/ 


/* 


column coordinate 


*/ 


/* 


row coordinates 


*/ 


/* 


video page number 


*/ 


/* 


BIOS video routine call 


*/ 
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CLRSCRNQ: Clears screen by invoking BIOS VIDEO service 6. 

*VfVf*^V*VfVc**VcVc^V^V**Vc*Vc*yrVc*yfVfVcVfVfVcVfVcV?VfV?**Vr*Vf*Vf*Vr**Vc*Vc^V**Vc**VcVc*Vf*V«’**VcVcV«’ j 



Void 
clrscrn( ) 



union REGS rg; 
rg. h. ah=SCROLL_UP; 


/* 


rg. h. al=0; 


/* 


rg. h. ch=0; 


/* 


rg. h. cl=0; 


/* 


rg. h. dh=24; 


/* 


rg. h. dl=79; 


/* 


rg. h. bh=0; 


/* 


int86( VIDEO, &rg,&rg); 


/* 


putcur((Int) l,(Int) 1); 


/* 



screen scroll code */ 
clear screen code */ 
start row */ 
start column */ 
end row */ 
end column */ 
blank line is black */ 

BIOS video routine call */ 
reposition the cursor */ 



J'k'k'k'k'k'k'k’k'k'jK'it'k'k'k'k'k'k'k'k'k'k'k'k'k'ivk'k'Irk'irU’k'k'k'isirk’kirk'k'i? itic'kirkit’k’H'Mt'irk'Ick' ^rkicirir/crfr/c’^’k 

READCURC): 

Reads the cursor position by calling BIOS VIDEO service 3. 

Vr^V*VcVf*VrVcVcVcVrVcVc , *Vr*VcVc , **VrVr*VcVr*VrVc*VfVfVcVfVfVcVc*VcVrVcVrVcVf*VrVc*Vf**VfVc , VcVr**VcVc*** , 3V , *Vc , Vc’Vc , 5V J 

Void 

readcur(r,c) 

Int *r,*c; 



union REGS inrg,outrg ; 






inrg. h. ah=GET_CUR; 


/* AH=f unction no 3 


*/ 


inrg. h. bh=0; 


/* video page number 


*/ 


int86(VIDE0,&inrg,&outrg) ; 


/* DOS call 


*/ 


*r=outrg. h. dh; 


/* returned row number 


*/ 


*c=outrg. h. dl; 


/* column number 


*/ 



} 

GET_KEY( ): 

Gets key from keyboard and if it is non ASCII key 
returns scan code for it. 

yrSVV^^V^V^VVc******^*********^******************************^^*^*^****** j 



Int 

get_key( ) 
Int chi 



if ( ( ch=bdos ( KEYIN ,0,0) 
return ( ch); 



return ( ( bdos ( KEYIN ,0,0) 

} 



/* if normal key codes */ 

& LOBYTE ) != ' O') 

/*convert scan codes to unique*/ 
/* internal codes */ 

& LOBYTE) | XF ); 
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WRITECC): 

This function writes a character or string of identical characters, 
starting at the current cursor position. It does not advance 
the cursor. 

VcVcyrVcy<'VcVrVryrVtycVr*yv VcVoWcyrVwcyf***ycVrVoV*VcVoVV?VcVc* j 



Void 

wr itec( ch , count ) 

Char ch; 

Int count; 

union REGS inrg,outrg; 



inrg. h. ah= WR I TE _ C HAR ; 

inrg, h. al=ch; 

inrg, h, bh=0; 

inrg. x. cx=count; 

int86( VIDEO , 6c inrg , 6coutrg) ; 



READCAQ: Reads the character with attribute 






Void 

readca(ch,attr) 

Char *ch; 

Int *attr; 

union REGS inrg, out rg; 
inrg. h. ah=RE_C_ATT; 
inrg. h. bh=0 ; 
int86( VIDEO, &inrg,&inrg); 
*ch=outrg. h. al ; 
*attr=outrg. h. ah; 
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/7V****^V*******Vc**^**********Vc^*******ycVc**^V***Vc***Vc***************Vc* 
WRITECAQ: Writes character with attribute for the number of count 



**yr->vyc****y«v***yf*****ycVcyr 

Void 

writeca( ch, attr , count) 
Char ch; 

Char attr; 

Int count; 



■*y?*yf****yf**yc****yc*ycyr**yr*****yc***yr« 



yc******VfVr* j 



union REGS inregs ,outregs; 



inregs. h. ah=WR_C_ATT ; 
inregs oh. al- ch ; 
inregs. h. bh^ 0; 
inregs. h. bl= attr ; 
inregs. x. cx= count; 



int86( VIDEO, 6c inregs ,6coutregs ); 



j^'k'k'k'k'k'b'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k-k'k'k'k'k'k'k'k'k'k-k-k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k ******** 

WRITEAC): 



Reads N characters from current cursor location on and 
writes them back with specified attribute 



Void 

writea(atr ,n) 
Char atr; 
Int n ; 



Int i; 

Char attrx; 
Int chx; 

Int r,c; 



} 



readcur(6cr ,6cc); 
for ( i=0; i<n; ++i) 



putcur(r,c+i); 
r eadca( 6cchx , &attrx) ; 
writeca(chx, atr, (Int) 

putcur(r ,c); 



i); 



/ypycycyrypycypypycyc*ycycycyfypyfypyfycypyrypycycycyc*ypypyc*yp*ycycypypypycycycypyc*ycypyr>Wcypyc*yp*>v*ycycyp***yp->v**** 

RING_BELL(): Rings the bell by sending character defined as BELL 

to the output port. 

ycy:ypypycypy?yrycycycy?ycycycycycycycypypycyfycypycyc^vyeyf*ypycycypycycycycyeycypycycycycycycycye*)V*yc*ye*ycyfypypypyc*yfycypypyp* j 



Void 

ring_bell( ) 
putch(BELL); 
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PUTSTRC): 

Displays the null terminated string on the screen from current cursor 
position on. 

•jV'jVVc’-j'r^V'jV'sV^VVr'jV^V'jVVc'sV'jV'sV'sV'sV'jV'jVVrjV^V’sV'sV'sWc'sV'sV'jV'sWrsV'sWr^V '^ J 

Int 

putstr( s ) 

Char *s; 



{ 



Int r,c,cO; 

readcur(&r ,&c); 

for ( cO=c; *s! =l 0 1 ; ++s ,++c) 



{ 



putcur( ( Int)r, ( Int)c); 
writec(*s ,( Int) 1); 



} 

putcur( ( Int)r,( Int)c); 
return(c-cO); 

WRITEMSGQ: Writes field message with specified attribute. 

Int 

writemsgCrj^Wjmsgjattr) 

Int r,c,w; 

Char *msg; 

Int attr; 

Int i; 

Char ch; 

putcur(r,c); 

i-0; 

while ((*msg!=' 0 1 ) && ( i<w )) 
ch=*msg; 

writeca( ch j ( Int) attr ,( Int) 1); 
putcur( r ,++c); 

++msg; 

++i ; 

return( i); 

SVDPG(): Sets active video page 

**Vc*ifc*:fr*tofrtoV**:fryc****Tfr:k*Tfr***toV****rt^** •k m k'ki<i< ,, k'k'k'k'k'k'h'k'k'kit'ki<'k'k m k'k'k'k'k'k'k , k'k'k , i< ,, k J 

Void 

svdpg(vp) 

Int vp; 



{ 



union REGS inregs 3 outregs; 

inregs, h. ah=SETVDPG ; /* BIOS Video Service 5 */ 
inregs.h. al= vp ; /* Active display page to be set */ 
int86 ( VIDEO 3 & inregs 3 &outr egs ) ; 
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j ^VVT***Vr^V***VT^***V?7c**Vf**V?*VrVr**Vr*VftVVr**^V***V^‘^r*Vf*******^*yc**Vr**^fr**V^^*^t^r■* 

ACVDPG(): Gets active video page 

VrVTVrVr^rVrVrVr^VVT^VVrVrVrTrVr^TVr'rV'T 7riVVfVrVrVf7V:V^Vr^tVVryf*:V^VVrVfyr*:VVr“/V^VVfVoV7Vr?VcVftr^VrVc7V , 5'« ,, ^c' , 5V7V'5V , 3VV< , Vf'5VVrrr , sV j 

Int 

acvdpg( ) 

{ 

union REGS inregs , outregs; 

inregs. h. ah=GETVDMOD ; /* BIOS Video Service 15 

to get video information */ 

int86( VIDEO,&inregs ,&outregs); 

return( outregs. h. bh); /* return the active display page 

number in bh register */ 

} 



SHIFT_STATUS( ): Gets shift status 

TTTryV^WfVr •ivk'k'it'ivirk'k'kis'k’kit 'kit •kivk'k'is "k'k'k irk Vr 'irit'it'Mvkirk'k'k irk'kltlt'ivk'klrk ********* **** **** J 

Bool 

shift_pressed( ) 

{ 

union REGS inregs , outregs; 

Char status_byte; 

inregs. h. ah=K3D_STATUS; 
int86(KBD_INT,&inregs ,&outregs); 



status_byte=outregs. h. al; 
status_byte=status_byte & 0x43; 



switch 

{ 

case 


( status_byte) 


/* 

/* 

/* 


1: return(TRUE); 


/* 


case 


2: return(TRUE) ; 


/* 


case 


3: return(FALSE); 


/* 

/* 


case 


64: return(TRUE); 


/* 


case 


65: return( FALSE); 


/* 


case 


66: retum(FALSE); 


/* 


case 


67: return(TRUE); 


/* 



first and second bit for 



*/ 

*/ 

*/ 

*/ 



*/ 

*/ 



default: return(FALSE); 
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MODULE 



DLADT. C 



VERSION: 1.0 



AUTHOR : Met in AKINCI 



DATE : 10 MAY, 1988 



EXPLANATION: 

General purpose Doubly Linked List 
abstract data type. 

Application side has to provide pointer to linked 
list and pointer to data . 

Appropriate compare function must be provided by 
user of this module. 

Implementation of this module is 
independent from data structure. It has been 
implemented by using C language's generic pointer 
feature. 



CHANGE LOG: 




//include tf prport, h t? 



//include <mem. h> 



//include <stdlib. h> 
//include <stdio. h> 
//include <alloc, h> 



typedef char DATA; 



typedef struct DLNODE 

{ 



/* generic pointer to data 
/* Doubly linked list node 



*/ 

*/ 



/* data structure 



DATA * pdata; 
struct DLNODE *left; 



/* generic pointer to data 
/* pointer to left node 



*/ 

*/ 

*/ 



struct DLNODE *right; 
} DLNODE; 



/* pointer to right node 



typedef struct DLLIST 



/* Doubly Linked List structure */ 



DLNODE *head,*tail ,*curr; 
} DLLIST; 
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y*****^V*****^V***^V**^V^VVc^V^V*^V^V**^V****ycVc*Vc^V**Vc - )VVc , )V - )VVc , 5V , 5V , 5VVc-)V**Vc , 5V‘3V'5V* , 3 l c , 5V**jV*-5V‘jV* 

DL_ALLOC(): Creates doubly linked list. Returns pointer to 
dllist. 

******Vc , »V****V?^V**Vc^V*********^V**Vc* , !V^VVcVc*Vc**Vc*^****Vf*“V*VcVfVf*^VV?Vf**Vc*VfVc* , *V? J 

DLLIST * 



dl_alloc() 

{ 

DLLIST *pdl; 

pdl= (DLLIST *) malloc(sizeof (DLLIST)); 
if ( ! pdl) 

return(NULL); 

pdl->head=NULL; /* initialize to null */ 

pdl->tail=NULL; 

pdl ->curr=NULL; 

retum(pdl); /* either null or succesful pdl */ 



/*********** **Vc****Vc***Vc**yc**^*****Vr****** , 5V*j l c*Vc***Vc* , >V**Vc**^?Vc , *Vc* , >V*Vc* 

DL„FIND(): Finds data in the doubly linked list and sets 
current pointer then returns pointer to data found. 

A***************************************************************** J 

DATA * 



dl_find(pdl ,pnode,pfcmp) 

DLLIST *pdl; 

DATA *pnode; 
int (* pfcmp)(); 

int comp; 
if (!pdl->head) 

return( NULL) ; /* list is empty */ 

pdl->curr=pdl->head; 
while (pdl->curr) 

corap=(*pf cmp) (pnode ,pdl->curr->pdata); 
if (comp=0) 

return(pdl->curr->pdata); 
else if (comp<0) 
return(NULL); 

pdl->curr=pdl->curr->right; 

return(NULL); 

} 
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DL_DELETE(): Deletes data provided by user from dllist 

Returns TRUE if attemp is succefull otherwise FALSE. 

Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc V? “V “V Vc Vc Vc Vc Vc Vc Vc Vc Vc “V Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc Vc j 



Bool 

dl_delete(pdl ,pnode,pfcmp) 
DLLIST *pdl; 

DATA *pnode; 
int (*pfcmp)(); 

DATA * tempnode; 



if (! (tempnode=dl_find(pdl,pnode,pfcmp))) 

return(FALSE); /* not exists */ 

free( tempnode) ; 



if (pdl->head=pdl->curr) 

pdl ->head=pdl ->curr ~>r ight; 

/* if it is first element */ 

if (pdl->tail=pdl”>curr) 
pdl “>tail=pdl“>curr-> left; 

/* if it is last element */ 

if (pdl->curr->left) 

pdl->curr->left->right=pdl”>curr->right; 

if (pdl->curr->right) 

pdl ">curr ->r ight ->left=pdl->curr”> left; 

free(pdl->curr); /* delete the node */ 

pdl->curr=pdl->head; /* reset the current pointer */ 



return(TRUE); 



} 



100 



DL_ADD(): Adds data provided by user into doublu linked list. 
Returns False in case of failure. 

Eool 

dl_add(odl ,pnode ,pf cmp) 

DLLIST *pdl; 

DATA *pnode; 
int (*pfcmp)( ); 

DLNODE *pdlnode; 



if (dl_find(pdl,pnode,pfcmp)) 

return(F ALSE) ; /* already exists in the list */ 



pdlnode=( DLNODE*) malloc ( sizeof( DLNODE) ); 
pdlnode->pdata=pnode; 



if ( pdl ->head=NULL) 

pdl->head=pdl->tail=pdlnode; 

pdlnode->right=pdlnode->left=NULL; 

else if (pdl->curr=NULL) /* my node is the greatest */ 

pdl->tail->right=pdlnode; 
pdlnode->left=pdl->tail; 
pdl->tail=pdlnode; 
pd Inode ->right=NULL; 

else 

{ /* my node is somewhere either in 

middle or at the beginning */ 

if (pdl->head=pdl->curr) ■ 

{ /* my node should be first */ 

pdlnode->right=pdl->head; 
pdlnode->lef t=NULL; 
pdl ->head=pdlnode; 

else 

{ 

pdl ->curr->lef t->right=pd Inode; 
pdlnode->right=pdl->curr; 
pdlnode->left=pdl->curr->left; 
pdl->curr->left=pdlnode; 

, 1 

return(TRUE); 

} 
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y'^V^V*^V****^V^V^*****^V****^V^V^V^V**^V**^V**^V****^V*****^V***** , 5V , * , } , f , *** , 5V'jV , *'5V‘>V , * , >V*^V 

DL_FREE(): Deallocates memory allocated for doublu linked list. 

Deallocation of memory allocated for user data is under 
user responsibilty. 

',V*y??V?VVe*Vr“Wc“WcVc?VVoW? , KVc , 5Wc , 3WcVc“V , jV , >V“,V , 5V , 3VVc^ j 

Bool 

dl_free(pdl) 

DLLIST *pdl; 

DLNODE *tempnode; 

if ( ! pdl) 

return(FALSE); /* error */ 

if (!pdl->head) 

free(pdl); 

return(TRUE); 

pdl->curr=pdl->head; 
while (pdl->curr) 

tempnode=pdl->curr; 

pdl->curr=pdl->curr->right; 

free(tempnode); 



} 



free(pdl); 

return(TRUE); 



DL_NEXT(): Sets the current pointer to next node in the list. 
Returns pointer to next node data. 

* -jV-jV * ->V tV-jV ■/? Vc *jV "k ic Vc VoV Vc * Vr * * * Vc * ** *>V ->V -jWc -jV * ** ** * * * * * ** ** * -jV * =}V •kit'fr'k Ve j 

DATA * 
dl_next(pdl) 

DLLIST * pdl; 



{ 



pdl ->curr=pdl->curr->r ight j 



if (!pdl->curr) 
return(NULL); 
return( pdl->curr->pdata) ; 
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j ***iV*Vc***^V*Vf********VfiVVf**VcVfiV**^****VfVf*Vr**^*VfVf^****Vr**yc*****Vc****Vr 

DL_PRIOR(): Sets the current pointer to previous node. 

Returns the pointer to prior node data. 



^Vc*Vc’Vr^V********V-**Vr**Vf*VfVfVf*Vfyr*V?**Vc*******yfVcVc*Vf*Vf**V«'*’3V*Vc****VcVc***** , sV 



iWrsV j 



DATA * 



dl_prior(pdl) 
DLLIST *pdl; 



{ if ( ! pdl->curr->left) 
return(NULL); 

pdl->curr=pdl->curr->left; 
if (pdl->curr) 

return(pdl->curr->pdata); 

return(NULL); 



Vc 'It'is'is'k'lt'te'k'te'k'irk'kirk'iz'k'itis'k'iHs'k'ls'lx'k'k'ivirk'Is'k'lt'k'it'Ms'it'lt'k 

DL_FIRST(): Sets the current pointer to first element in the list. 
Returns the pointer to first data in the list. 

DATA * 



dl_first(pdl) 

DLLIST * pdl; 

pdl->curr=pdl->head; 
if (pdl->curr) 

return(pdl->curr->pdata); 

return(NULL); 



} 



********************'***■***************’***** 
DL_LAST(): Sets the current pointer to last item in the list 
Returns pointer to last data in the list. 

DATA * 



dl_last(pdl) 

DLLIST *pdl; 

pdl->curr=pdl->tail; 
if (pdl->curr) 

return(pdl->curr->pdata); 

return(NULL); 

} 



y/*VrVc*VcVw%Vr**^**^VcV?***Vr**Vf**VfVfycVfVc*yfVfVrVr***VrVf*Vc***yfVc^yfyfVrVrVf*y?*V?yryfVr*Vc , * , A ,, /f 

DL_CURR(): Returns pointer to data pointed by current pointer. 

jm V?V? V? V* Vf Vf V? '2\'l\ 'f\'tC'*c V? V? VwV Vc V» Vc "tC'tC V? V» VcVf Vf "sV V» V» V? V? V* Vfj 11 ? Vf VcVf i jW\ «V /VV* V? V? .Wf /tVf VfVfVf Vc^VV? VirVf j 

DATA * 



dl_curr(pdl) 

DLLIST *pdl; 

if (pdl->curr) 

return(pdl->curr->pdata); 

return(NULL); 
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MODULE : LLADT. C 

VERSION: 1. 0 
AUTHOR : Metin AKINCI 
DATE : 15 MAY, 1988 
EXPLANATION: 

General purpose linked list implementation. 
It has been implemented by using C language's 
generic pointer feature. 

Pointer to data and appropriate compare function 
must be provided by application side. 

CHANGE LOG: 




^include "prport. h" 
^include <stdio. h> 



typedef char DATA; 



/* generic pointer to DATA */ 

/* define each node of the list */ 



typedef struct LLNODE 



DATA *pdata; 
struct LLNODE *next; 



/* generic pointer to data 
/* pointer to next node 



7 

/ 



} LLNODE; 



typedef struct LLIST 



/* linked list structure 



LLNODE *head,*tail ,*curr; 
} LLIST; 
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/*7V**************Vc******************-j'c'*'iV*-!V*Vr*-A'*-!V**-A'*')'r****7V*******Vt' 

LL_ALLOC(); Creates an empty linked list. 

Returns pointer to newly created list. 

7V7V7>7V7V7V7Wr-V-V7W?7V7V7V*7Wr7WC*7 l f7 , C**7Wr*7V7V*7V7V7We7W-7Wr7V7Wr7V*7V7Wr**7V*7V7V7V7Wr*7V****5V*7V j 

LLIST * 
ll_alloc( ) 

{ 

LLIST *pll; 

pll=( LLIST *)malloc( sizeof( LLIST) ); 
if (pll) 

p 1 1 - >he ad=NULL; 
pll->tail=NULL; 
pll->curr=NULL; 

return(pll); 



LL_FIND(): Finds any data in the linked list and returns pointer 
to data. Appropriate compare function must be provided 
by user of this module. 

DATA * 



ll_find(pll,pnode,pfcomp) 
LLIST *pll; 

DATA *pnode; 
int (*pfcomp)( ); 

int comp; 



if (!pll->head) 
return(NULL); 



/* linked list is empty */ 



} 



pll->curr=pll->head; /* start from beginning 

while (pll->curr) 

comp=(*pf comp) (pnode, pll ->curr->pdata); 
if (comp=0) /* data is found in the list 

r eturn( pll ->curr - >pdat a ) ; 
else if (comp<0) 

return(NULL); /* it is smaller than first 

pll->curr=pll->curr->next; 

/* keep searching 



} 

return(NULL); 



*/ 



*/ 



*/ 



*/ 
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LL_DELETE(): Deletes data from linked list. Returns TRUE 
if attempt is succesful otherwise FALSE. 

****Vf*****VcVc*Vc*Vc****^V*VcVc*Vf*******VnV**********VcVc**VcVcV«VVoV*Vc fc ,VVc***Vc , 5V , 3V‘>V j 



Bool 

1 l_d e lete(pll, pnod e , p f comp ) 
LLIST *pll; 

DATA *pnode; 
int (*pfcomp)(); 

LLNODE *t empnode; 

DATA *temp; 



if (! (temp=ll_find(pll,pnode,pfcomp))) 

return( FALSE); /* not exists in the list */ 

tempnode=pll->curr; /* if exists, save the pointer */ 

/* to the data to be deleted */ 
if (pll->head=pll->curr) /* if it is first element in list*/ 

pll->head=p] l->curr->next; 

free(pll“>curr); 

return(TRUE); 



if (pll->tail=pll->curr) /* if it is last element in the list*/ 

pll->curr=pll->head; /* find the previous node */ 

while (pll“>curr->next! =pll->tail) 
p 1 1 ->cur r=p 1 1 ->curr ->next ; 
pll->tail=pll->curr; 

return(TRUE); /* return the new last item */ 

/* otherwise it is somewhere 

in the middle */ 

pll->curr=pll->head; 
while (pll->curr->next ! =tempnode) 
pll->curr=pll->curr->next; 
t empnode=p 1 1 ->curr; 

t empnode * >next =t empnode - >next - >next ; 
f ree( tempnode°>next ) ; 
return(TRUE); 
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/***************■ jV-jV************************^’?************************* 
LL_NEXT(): Sets the current pointer to next node and 

returns pointer to data in the next node of list. 



:V Vc trtWc Vr iWr iV Vc -V ■jW?* Vc V? ^V^Wc^ViWcVnV^VuV^V* 



Vf Vr V? tV Vr •) V ■sV -jV ->V -/r Vr “V Vc -V tV Vc Vc tt vr Vt ■ 



DATA * 



* *Wr -}W: Vc ‘V ^WcVcsWc ‘We* Vc 



/ 



ll_next(pll) 

LLIST *p 1 1 ; 

{ 

pll->curr=pll->curr->next; 
if (pll->curr) 

return(pll->curr->pdata); 
re turn (NULL); 



j ****^V**^V**Vc^VVf**^^^V****^*********Vr*^V^Vf*^********* , JV^f***** , }V****‘>V*‘5V*Vc , * 

LL_FIRST(): Sets the current pointer to first item in the list. 
Returns pointer to data in the first node of list. 

**********Vf*********^V“V*********************************Vf**^*** , >V , A‘**5V* j 

DATA * 



ll_first(pll) 

LLIST * pll; 

p 1 1 ->curr=pl 1 ->head; 
if (pll->curr) 

return(pll->curr->pdata); 

return(NULL); 



j^^^^^^Ws^^^ix^^'k'k'ts'k'k'k'k'k'k'k'k'it'k'k'kit'k'k'k'kit'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'k'ls'k'k'k'k'k'k'k'k'k 

LL_LAST(): Sets the current pointer to the last item in the list. 
Returns pointer to data in the last node. 

********Vr*****VnV***Vf****^V**Vf^V*****^V^V*1V**^V*****yf*******VrVf**** , sV**‘}V , 5V* , * j 

DATA * 



ll_last(pll) 

LLIST *pll; 

pll->curr=pll->tail; 
if (pll->curr) 

return( pll->curr->pdata); 
return(NULL); 
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LL_ADD(): Adds new item into linked list. Appropriate compare 

function must be passed by user. Returns FALSE if item 
to be added is already in list. 

*Vc^V^V*Vc*Vc?V*Vf****?V‘VV«VV«V?VVf?VVoV*VoV**?VV«V*VcVoV*^VVc^V*^V*VrVf**?V*VoV*VoV^V***^V , >V?V** j 



Bool 

ll_add(pll ,pnode,pfcomp) 

LLIST *pll; /* pointer to linked list */ 

DATA *pnode; 
int (*pfcomp)(); 

LLNODE *temp,*tempnode; 



if ( ll^findCplljpnodejpfcomp)) 

return( FALSE); /* already exists 



*/ 



/* prepare linked list node */ 
temp= (LLNODE *) malloc(sizeof(LLNODE)); 
temp->pdata=pnode; 

if (pll->head=NULL) /* if linked list is empty */ 

pll->head=pll->tail=temp; 

temp->next=NULL; 

else if ( p 1 1 - > cur r =NULL ) 

/* mynode is the greatest */ 

pll~>tail->next=temp; 
pi l->t ail-temp; 
t emp ->next=NULL; 

} 

else /* else my node is somewhere in */ 

{ /* the middle or at the beginning*/ 

if (pll">head=pll->curr) 

pll“>head=temp; 
temp “>next=p 1 1 ~>cur r ; 

else 

{ 

t empnode=p 1 1 ->cur r ; 

/* save the current pointer */ 
pll->curr=pll->head; 

/* start from beginning */ 

/* find the previous node */ 

while (pll->curr->next! =tempnode) 
pll->curr=pll->curr->next; 
pll ->curr->next=temp; 
t emp - >next=t empnode; 

return(TRUE); 



} 
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^ ************ ***************************************************** 
LL_FREE(): Deallocates the memory allocated for linked list. 

Deallocation of memory allocated for data must be freed 
before this function is invoked. 

****************************************************************** j 

Bool 

ll_free( pll) 

LLIST *p 1 1 ; 

LLNODE *temp; 



if C* Pll) 

return( FALSE); 



/* error 



*/ 



if (!pll->head) /* if linked list is empty 

free(pll); 

return(TRUE); 

} 

pll->curr=pll->head; 
while (pll->curr) 



temp=pll->curr; 
pll->curr=pll->curr->next; 
free( temp); 



*/ 



free(pll); 

return(TRUE); 
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MODULE : EGACHR. C 
VERSION: 1.0 
AUTHOR : Metin AKINCI 
DATE : 15 APR, 1988 
EXPLANATION: 

This is a memory resident program. Creates 
extra characters in the Turkish alphabet for EGA 
adapter. This program reads the system info, 
if EGA is present, it is installed. 

Otherwise terminates by prompting user. 

This program should compile and run outside 
of integrated environment. 

CHANGE LOG: 



//include 

//include 

//include 

//include 

//include 



<stdio. h> 
<dos. h> 
<process. h> 
<mem. h> 
<stdlib. h> 



//define TRUE 1 
//define FALSE 0 



/* Functions related to video operations */ 

void 

loadegachr( char *fptr,int block, int bpc,int char_count , int spos); 
void 

get_egafont(char *fptr, int font); 
int 

get_video_inf o( void) ; 
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/* Global variables and //DEFINES related to video operations */ 

7 v /include "egachr. asc n /* egachr. asc contains our */ 

/* own character font */ 

//define VIDEO 0x10 /* BIOS video interrupt */ 

char fontarray[ 3585] ; /* buffer for font storage */ 

char ega_color; 



/* Global variables related to TSR operations */ 

unsigned save_bpl, save_bp2, old_ds, old_psp; 
unsigned old„env; 



/* Turbo C system variables */ 

extern unsigned brklvl: 
extern unsigned _psp; 



void 

error ( int errnum) ; 



main( ) 

int i, j, k; 
union REGS regs; 

get_video_info( ); 
if (!ega_color) regs.x. ax = 0x7; 

/* set the video mode */ 

else regs. x. ax = 0x3; 
int 86 ( VIDEO ,&regs ,&regs ); 

/* system checks out --go ahead and put own chars, in font */ 

get„egaf ont ( font array , 14) ; 

/* store the ROM font in fontarray */ 

for(i=14*128,j=0; i< 14*140; j++) 

for(k=0; k<14; k++) 

/* overwrite our own characters */ 
fontarray[ i++] = egachr_array[ j ] [ k] ; 



loadegachr( fontarray, 0, 14,256,0); 

/* load our font */ 

/* terminate and stay resident. Program length is determined by*/ 

/* subtracting the psp address (_psp) from brkval which is */ 

/* dynamically set to the address of the end of DS. */ 

keep(FALSE ,_DS + ( brklvl + 15 ) / 16 - _psp); 
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-jWc *>Wc Vc Vc-Vc -jV^V^V *5V^r ■ycVc-A- -A- Vr Vc -jV^V^r -sV -A--3V 'sV-jWc’ ^ Vc Vc-^V -sV-jV -A* ■sV^V-A- -jV-jV Vr Vc Vc Vc ■A-Vc- ■A'-A- -sWc-jV -iV-sV-sV Vr *3V -sWc ^V j 

/* LOADEGACHR -- Load a user-defined font and reset page length. */ 
/* Parras: ptr. to user table, block to load, bytes -per-char , */ 

/* number of chars to store, starting position in font table. */ 

y r *V'*Vc , Vc**Vc^V*VfVfwVcVfV«'Vf*VfVcVcVfVc*V«’*VcVcVf^VVc’VcVry?**Vf*V<’VcVcVcVfVfVcV?VfVc'VrVfVfVc*VfVc*VrV?*V« , Vc , 3VVf“VtV j 

void 

loadegachr( char *fptr,int block, int bpc,int char_count , int spos) 



unsigned byte_block; 
byte_block = (bpc « 8) | block; 



} 



ES = DS; 




_AX = 0x1100; 


/* 


_BX = byte_block; 


/* 


_CX = char_count; 


/* 


_DX = spos; 


/* 


save bp2 = BP; 


/* 


_BP = FP„0FF( fptr) ; 


/* 


geninterrupt( VIDEO) ; 




_BP = save_bp2; 





call function Oxll */ 
block to load */ 
number of characters to load */ 
character offset into table */ 
save BP for stack addressing */ 
load address of user font */ 



/* GET_EGAFONT: This routine grabs an EGA font from ROM */ 

/* and stores it in the global variable fontarray */ 

^V*^V*^V^V*^V***^V**^V****Vc , Vc*Vc******VrVc**^V*Vc******Vc , **^V****** , 3V* , 3V^c , *'5V** , 5V^V , ;V J 



void 

^et_egafont( char *fptr, int font) 
struct REGPACK regs; 



regs.r_ax = 0x1130; /* EGA BIOS call to return font */ 

if (font == 8) 

regs. r_bx = 0x0300; 

else if (font — 14) regs. r_bx = 0x0200; 
intr( VIDEO ,&regs ) ; 

movedata(regs. r_es,regs. r_bp,_DS, (unsigned) fptr, 14*256); 



/* GET VIDE0_INF0: A VGA or an EGA must be installed for this */ 

/* program to work. The monitor must be an Enahanced Color or */ 
/* Monochrome display and the correct adaptor must be active. */ 

j iV ? Wc * 5 V * * -jV -jV * V«r * Ve Vc * * * - 5 V -k Vr 'V * ?V * * 3 V - 5 Wr * * * * V? Vc * * Vc * * -jWc Vc -jV - 5 V * vV * * * Vr * * * * ?V “V * -V * Vr Vr Vr * 5 V * * * j 

int 

get_video_info( ) 



union REGS regs; 
unsigned char e_byte; 



/* First check for the presence of an EGA */ 
regs. h. ah = 0x12; /* EGA BIOS alternate select */ 

regs.h. bl = 0x10; /* return EGA information. */ 

int86(VIDE0, &regs , &regs); 

if (regs.h. bl = 0x10) error(l); /* EGA not found */ 



112 



*/ 
«k / 

*/ 



/* EGA is present -- is it active? */ 
e_byte = peekb( 0,0x487); 

/* EGA info, byte 
if (e_byte & 8) error(2); 

/* EGA not active 

/* Does the present, active EGA drive a color or mono monitor? 



if (regs.h. bh) ega_color = FALSE; 

/* EGA drives a mono monitor */ 

else ega_color = TRUE; /* EGA drives a color monitor */ 

/* See if EGA drives an Enhanced Color Display */ 



} 



if (ega_color) 

if (! (regs.h. cl = 3 || regs. h. cl = 9)) 
error( 1); 

return (1); 



/* ERROR: A simple error handler. */ 

void 

error(int errnum) 



switch (errnum) 

case 1: printf( n An EGA and Enhanced Color or Monochrome Display"); 
printf(" nmust be present to use this program."); 
break; 



case 2: printf(" Please make the EGA the active adapter"); 
print f( "in order to run this program."); 
break; 



default: break; 

printf(" nProgram exiting, n"); 

exit(Oxf); /* Return code for DOS errorlevel */ 
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j ic ******** icrkicMcMf ******Vf****^*^VVc^c , **Vc^V**^V^f*Vf**^fVc*Vc*Vc***V<r^f *********** j 



/* 

/* 



FILE NAME: EGACHR. ASC 



*/ 

*/ 



/* egachr. asc: This is an ASCII representation of the italic font */ 
/* characters used in egachr. C. This file is #includeD. */ 

/* In the table below, each row corresponds to a character. The */ 
/* 14 elements of each row correspond to the 14 scan lines of the */ 
/* character. */ 

y , *^V^V***^V**^V***Vf^V^V****Vc*****Vf^V*^V*****Vc , **^V^V*Vc , ^VVc*Vc^V*^VVc*********'5V^VVc'*** j 



char egachr_array[ 12] [ 14] 



{ 0x00, 0x00, 
0x60,0x38, 
/* s */ 

{ 0x00, 0x00, 
0x0c, 0x0c, 
/* S */ 

{ 0x00, 0x00, 
0xc6, 0xc6, 
/* o */ 

{ 0x6c, 0x00, 
0xc6, 0xc6, 
/* 0 */ 

{ 0x00, 0x00, 
Oxcc, Oxcc, 
/* u */ 

{ 0x00, 0xc6, 
0xc6, 0xc6, 
/* U */ 

{ 0x00, 0x00, 
Oxcc, Oxcc, 

/* S */ 

{ 0x3c, 0x00, 
Oxde, 0xc6, 

/* g */ 

{ 0x00, 0x00, 
OxcO, OxcO, 
/* c */ 

{ 0x00, 0x00, 
OxcO, 0xc2, 
/* C */ 

{ 0x00, 0x00, 
0x18, 0x18, 
/* i */ 

{ 0x18, 0x00, 
0x18, 0x18, 
/* I */ 

} ; 



0x00, 0x00, 
Oxcc, 0x78, 

0x78, Oxcc, 
Oxcc, 0x78, 

0x00, 0x66, 
0xc6, 0x7c, 

0x38, 0x44, 
0x44, 0x38, 

0x00, Oxcc, 
Oxcc, 0x7c, 

0x00, 0xc6, 
0xc6, 0x7e, 

0x00, 0x7c, 
0x7c, 0x0c, 

0x3c, 0x66, 
0x66, 0x3a, 

0x00, 0x00, 
Oxcc, 0x78, 

0x3c, 0x66, 
0x66, 0x3c, 

0x00, 0x00, 
0x18, 0x3c, 

0x3c, 0x18, 
0x18, 0x3c, 



= { 

0x00, 0x78, Oxcc, 
0x00, 0x30, 0x00 } 

OxcO, OxeO, 0x38, 
0x00, 0x30, 0x00 } 

0x00, 0x7c, 0xc6, 
0x00, 0x00, 0x00 } 

0xc6, 0xc6, 0xc6, 
0x00, 0x00, 0x00 } 

0x00, Oxcc, Oxcc, 
0x00, 0x00, 0x00 } 

0xc6, 0xc6,0xc6, 
0x00, 0x00, 0x00 } 

0x00, 0x7e, Oxcc, 
Oxcc, 0x78, 0x00 } 

OxcO , OxcO , OxcO , 
0x00, 0x00, 0x00 } 

0x00, 0x78, Oxcc, 
0x00, 0x30, 0x00 } 

0xc2, OxcO, OxcO, 
0x00, 0x18, 0x00 } 

0x00, 0x38, 0x18, 
0x00, 0x00, 0x00 

0x18, 0x18, 0x18, 
0x00, 0x00, 0x00 } 






s 



5 



J 



3 



9 



9 



9 



3 



} 



9 



9 
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y***Vf*VcVc*Vc*Vc*Vc**Vc^V***^VVc*^V**^V^*VcVc^^^***Vf***VcVc**Vc^*^****Vc****Vc*** , *‘3Vyc* 

PRPORT. H : Project portabilty header file. 

Contains programmer defined data types, printers, systems 
and compilers. 

Vv^VVrV»*VVc*VcVc^VVc , **VcV« , VfVcVr^VVrVrVcyrV?V^VcycV?*VrVcV?VfVcVfVfVr**Vf^VcVfyc**VcVr**Vc'*VcVcyfVfVf*VcVcV« , V?yfVcyr*Vc j 



/* Programmer defined data types 
typedef unsigned char Char; 
typedef int Int; 
typedef long int Long; 
typedef short int Bool; 
typedef unsigned char BYTE; 
typedef unsigned int WORD; 



//define 


Void 


void 


//define 


EXTERN 


/**/ 


//define 


TRUE 


(Bool) 1 


//define 


FALSE 


(Bool) 0 


//define 


GLOBAL 


/**/ 



//define 


TC 


1 


//define 


LC 


0 


//define 


MSC 


0 


//define 


IBMC 


0 



//define 


DOS 


1 




//define 


SYS5 


0 




//define 


CPM 


0 




//define 


UNIX 


0 




//define 


EPSON 




1 


//define 


IBMPROPRINTER 


0 


//define 


OKIDATA 


0 



/* define compilers */ 

/* Turbo C Compiler */ 

/* Lattice C compiler */ 

/* Microsoft C Compiler */ 

/* IBM C Compiler */ 

/* define OPERATING SYSTEMS */ 

/* DOS */ 

/* System-V 0/S */ 

/* CPM 0/S */ 

/* UNIX 0/S */ 

/* define PRINTERS */ 
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KEYDEF. H : Contains keyboard scan codes. 






//define 


XF 


0x100 


//define 


K PGDN 


81 


| XF 


//define 


K LEFT 


75 


XF 


//define 


K RIGHT 


77 


| XF 


//define 


K UP 


72 


| XF 


//define 


K CTRLH 


8 




//define 


K DOWN 


80 


| XF 


//define 


K ESC 


27 




//define 


K SPACE 


32 




//define 


K DEL 


83 


| XF 


//define 


K BACKS P 15 




//define 


K_RETURN 13 




//define 


K HOME 


71 


| XF 


//define 


K END 


79 


| XF 


//define 


K PGUP 


73 


| XF 


//define 


K CTRLZ 


26 




//define 


BELL 


7 




//define 


K CEND 


117 


| XF 


//define 


K ALTC 


46 | 


XF 


//define 


K ALTG 


34 | 


XF 


//define 


K_ALTI 


23 


XF 


//define 


K ALTO 


24 | 


XF 


//define 


K ALTS 


31 | 


XF 


//define 


K ALTU 


22 | 


XF 



#define LF (Char) 10 
^define BLANK (Char) 32 
//define CR (Char) 13 
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BIOSLIB. H : This file contains all BIOS definitions used in program. 






#define 


VIDEO 


0x10 


/* 


#def ine 


KEYIN 


0x7 


/* 



BIOS VIDEO INT 10 */ 

DOS function kbd input w/o echo */ 



/* VIDEO routine service numbers 
placed in AH register before a 
BIOS interrupt lOh. */ 



//define 


CUR POS 


2 






//define 


GET CUR 


3 






//define 


SCROLL UP 


6 






//define 


SCROLL DN 


7 






//define 


WRITE CHAR 


10 






//define 


WR C ATT 


9 


/* write char with attribute 


*/ 


//define 


RE C ATT 


8 


/* read char with attribute 


*/ 


//define 


SETVDPG 


5 


/* BIOS Video service 5 










sets active video page 


*/ 


//define 


GETVDMOD 


15 


/* BIOS Video service 15 










gets current video information*/ 


//define 


KBD_INT 0x16 


/* BIOS keyboard interrupt number*/ 


//define 


KBD_STATUS 2 




/* kbd status function number 


*/ 


//define 


LOBYTE OxOOFF 




/* Bit mask for low byte 


*/ 


//define 


HIBYTE OxFFOO 




/* bit mask for high byte 


*/ 








/* define video attributes 


*/ 


//define 


ATTR 65 




/* BYTE Attribute is RED background*/ 








/* BLUE foreground. 


*/ 
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y****^*****VnV****^V***VfVfVc , ***Vc , *^V*****Vc , *yf*^V***t)V*Vf*yf**^*V« , Vf , 3V* j 

/* FILE NAME: MYASCII. NUM */ 

/* Definitions of ascii number assigned for extra */ 
/* characters in the Turkish alphabet. */ 

j ic "V Vc Vr ■jWr Vr “V V? “V Vr “V V? ?V i~ V» ?V“ Wc Vc Vr Vc “V Vc V* Vc Vr Vr ■>’* “V ?V ■jV Vr “V “V V? Vr "V i< Vr Vr Vc Vr Vr ?Wc Vc Vr Vf Vr <V ^Wr j 



//define 


ascii_s 


128 


//define 


ascii_S 


129 


//define 


ascii„o 


130 


//define 


ascii_0 


131 


//define 


ascii_u 


132 


//define 


ascii_U 


133 


//define 


ascii„g 


134 


//define 


ascii„G 


135 


//define 


ascii_c 


136 


//define 


ascii_C 


137 


//define 


ascii_i 


138 


//define 


ascii_I 


139 
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FILE NAME: EPSON. DAT 



/* 



*/ 



/* Definitions of Standard printer control commands 
/'- for EPSON and Compatible Printers 



*/ 

*/ 



char 


p_init[ ] = ' 


033@"; 


/* 


hardware reset 


*/ 


char 


p_bold[ ] =" 


033E"; 


/* 


emphasized mode 


*/ 


char 


P_ds[] = " 


033G"; 


/* 


double strike mode 


*/ 


char 


P_ital[]» ’ 


0334"; 


/* 


italicized mode 


*/ 


char 


p_cmp[]= " 


017"; 


/* 


condensed mode 


*/ 


char 


P_exp[ ] = " 


016"; 


/* 


expanded mode 


*/ 


char 


p_ul[]=" 033-1"; 


/* 


underlined mode 


*/ 


char 


p_cbold[ ] = 


" 033F"; 


/* 


cancel emphasized mode 


*/ 


char 


p_cds[ ] = " 


033H"; 


/* 


cancel double strike mode 


*/ 


char 


p_cital[ ] =" 


1 0335"; 


/* 


cancel italic mode 


*/ 


char 


p_ccmp[ ] =" 


022"; 


/* 


cancel condensed mode 


*/ 


char 


p_cexp[]=" 


024"; 


/* 


cancel expanded mode 


*/ 


char 


p_cul[]= { 


27,'-\0 } ; 








char 


p_grmode[ 4] 


= { (char) 27, 


'K', 


(char)8,(diar)0 } ; 










/* 


set to dot graphics mode 


*/ 


char 


p_def ault[ ] 


=" 033P"; 








/‘define FF 12 










.^define LF 10 
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^*****^V*****Vc^V**Vr*^V****^V**************^V** , 5V , 3V* , 5V** , jV , 5V , 5V , )V , 5V*^V* , 5V*Vc*** , 5V , )V* j 

/* FILE NAME: EXTRA. FNT */ 

/* Here extra character font pattern for printers are given. */ 

^Vr*^V******Vr*Vc****^VVc*****^V***^V*/V***^V***Vr**V?*Vc****Vr********^V****“V* j 



char c_pattern [ 8 ] 
char CC_pattern [ 8 ] 
char i_pattern [ 8 ] 
char CI_pattern [ 8 ] 
char o_pattern [ 8 ] 
char CO_pattern [ 8 ] 
char s__pattern [ 8 ] 
char CS_pattern [ 8 ] 
char u_pattern [ 8 ] 
char CU_pattern [ 8 ] 
char g_pattern [ 8 ] 
char CG_pattern [ 8 ] 



{ Oxlc , 0x22 , 0x23 , 0x23 , 0x22 , 0x00 , 0x00 , 0x00 
{ 0x7c , 0x82 , 0x83 , 0x83 , 0x82 , 0x44 , 0x00 , 0x00 
{ 0x00 , 0x00 , 0x22 , 0x3e , 0x02 , 0x00 , 0x00 , 0x00 
{ 0x00 , 0x00 , 0x42 , Oxf e , 0x42 , 0x00 , 0x00 , 0x00 
{ Oxlc j 0xa2 j 0x22 , 0x22 , 0xa2 , Oxlc , 0x00 , 0x00 
{ 0x3c , 0xc2 , 0x42 , 0x42 , 0xc2 , 0x3c , 0x00 , 0x00 
{ 0x12 , 0x2a , 0x2b , 0x2b , 0x2a , 0x04 , 0x00 , 0x00 
{ 0x64 , 0x92 , 0x93 , 0x93 , 0x92 , 0x4c , 0x00 , 0x00 
{ 0x3c j 0x82 , 0x02 , 0x82 , 0x3c , 0x02 , 0x00 , 0x00 
{ 0x7 c , 0x02 , 0x82 , 0x82 , 0x02 , 0x7c , 0x00 , 0x00 
{ 0x32,0xc9,0xc9,0xc9 , 0x7 e, 0x00, 0x00, 0x00 
{ 0x3c , 0xc2 , 0xc2 , Oxca, Oxca , 0x2c , 0x00 , 0x00 



} 

} 

} 

} 

} 

} 

} 

} 

} 

} 

} 

} 
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APPENDIX D. EXAMPLE TEMPLATE AND PROGRAM OUTPUT 

DOCUMENT 



* EXAMPLE TEMPLATE DEFINITION 

* This is a comment line 

* DURUM RAPORU 

* row column width editable message 



3 


30 


30 


0 


@ 




T. C 






4 


30 


30 


0 


(§ 




Dz. K. K 




@ 


5 


30 


30 


0 




TCG. PIYALEPASA 


K. ligi 




8 


55 


20 


1 


@Tarih: @ 






10 


30 


30 


0 


@HAZIRLIK 


DURUM RAPORU 


@ 


11 


29 


30 


0 




— — — - 




@ 




12 


5 


20 


1 


<§IDARI:@ 








15 


5 


20 


0 


@PERS0NEL 








16 


5 


20 


0 






@ 






18 


30 


30 


0 


@ TAM KADR0 


MEVCUT ( 


19 


25 


40 


0 


<§ 










21 


10 


30 


1 


<§SUBAY 


: <§ 






21 


41 


20 


1 


m 










22 


10 


30 


1 


(§ASTSUBAY 


: 0 






22 


41 


20 


1 


m 










23 


10 


30 


1 


@ERAT 


: @ 






23 


41 


20 


1 












26 


5 


20 


0 


@MATERYAL 








27 


5 


20 


0 


<§“ 










29 


30 


30 


0 


@ TAM MEVCUT 


IHTIYAC 


30 


25 


35 


0 


<3 










32 
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